procedure SetEditText(ACol: Longint; ARow: Longint; const Value: string); override;