Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2010.08.27;
Скачать: [xml.tar.bz2];

Вниз

Как передать данные из одной процедуры в другую   Найти похожие ветки 

 
romario ©   (2010-04-27 20:47) [0]

1. Есть поле memo1 - его заполняю в одной процедуре
2. текст который находить в поле memo1 нужно использовать в другой процедуре


 
Lyonux ©   (2010-04-27 20:50) [1]

Используй глобальную переменную, в которую занеси текст своего memo.


 
romario ©   (2010-04-27 21:16) [2]


> Используй глобальную переменную, в которую занеси текст
> своего memo.

переменная должна быть типа TMemo?
если да её же нужно иницилизировать (создать) ?


 
romario ©   (2010-04-27 21:17) [3]

  procedure Button3Click(Sender: TObject);
   procedure FormCreate(Sender: TObject);
 private
   { Private declarations }
 public
    BufMemo: TMemo;
   { Public declarations }
 end;


 
Игорь Шевченко ©   (2010-04-27 21:23) [4]


> переменная должна быть типа TMemo?


переменная должна быть типа string и не глобальная а параметр


 
Lyonux ©   (2010-04-27 21:23) [5]

Такое ощущение, что я забрела не в ту степь) Данные,  записанные в memo имеют тип string. Можно создать глобальную переменную s:string и записать в неё данные из мемо: s:=Memo1.Text; И далееиспользовать s в нужных вам процедурах :)
Ну вот как-то так)


 
Lyonux ©   (2010-04-27 21:28) [6]


> Игорь Шевченко ©   (27.04.10 21:23) [4]
> > переменная должна быть типа TMemo?переменная должна быть
> типа string и не глобальная а параметр

можно и параметр.. а вдруг он изменит содержимое memo, но не присвоит его(если, например, присвоение по button1Click), а захочет выполнить какие-то действия с текстом, который был в memo ранее?


 
{RASkov} ©   (2010-04-27 21:29) [7]

Да не нужно никаких переменных.... memo1 и так уже глобальная переменная...
я не думаю, что memo1 - это локальная переменная в первой процедуре у автора :)


 
romario ©   (2010-04-27 21:31) [8]

BufMemo.Text:=memo1.Text;
такая стока не работает???


 
romario ©   (2010-04-27 21:33) [9]


> Да не нужно никаких переменных.... memo1 и так уже глобальная
> переменная...я не думаю, что memo1 - это локальная переменная
> в первой процедуре у автора :)

точно протормозил чуток)


 
Lyonux ©   (2010-04-27 21:35) [10]


> romario ©   (27.04.10 21:31) [8]
> BufMemo.Text:=memo1.Text;такая стока не работает???

да, работает)

А я тут мусолю человека со своим глобализмом)


 
romario ©   (2010-04-27 21:39) [11]

а какое свойство у memo чтоб скролинг вертикальный был?


 
Lyonux ©   (2010-04-27 21:42) [12]


> romario ©   (27.04.10 21:39) [11]
> а какое свойство у memo чтоб скролинг вертикальный был?


ScrollBars


 
Игорь Шевченко ©   (2010-04-27 21:43) [13]

Lyonux ©   (27.04.10 21:28) [6]


> можно и параметр.. а вдруг он изменит содержимое memo, но
> не присвоит его(если, например, присвоение по button1Click),
>  а захочет выполнить какие-то действия с текстом, который
> был в memo ранее?


А если он будет везти патроны...то свершится страшное и будет всем сакс и маздай.


 
Lyonux ©   (2010-04-27 21:47) [14]


> Игорь Шевченко ©   (27.04.10 21:43) [13]
> Lyonux ©   (27.04.10 21:28) [6] > можно и параметр.. а вдруг
> он изменит содержимое memo, но > не присвоит его(если, например,
>  присвоение по button1Click),>  а захочет выполнить какие-
> то действия с текстом, который > был в memo ранее?А если
> он будет везти патроны...то свершится страшное и будет всем
> сакс и маздай.


Поэтому существует куча всякий правил, законов и инструкций, запрещающих везти ему патроны :-Р


 
{RASkov} ©   (2010-04-27 21:52) [15]

> [14] Lyonux ©   (27.04.10 21:47)
> Поэтому существует куча всякий правил, законов

он дурак
...ну, тот, кто везет патроны


 
romario ©   (2010-04-27 22:02) [16]

не смотря на искромётный юмор и сарказм, все спасибо за помощь... особенно девушке, не часто встретишь программиста девушку :)


 
anonims   (2010-04-28 08:49) [17]


> текст который находить в поле memo1 нужно использовать в
> другой процедуре


почему бы просто не использовать сам Мемo и его свойства
func1( MEmo1.Text) ;
func1( Memo1.SelectText ) ;


 
oldman ©   (2010-04-28 14:07) [18]


> 1. Есть поле memo1 - его заполняю в одной процедуре
> 2. текст который находить в поле memo1 нужно использовать
> в другой процедуре


А текст из Memo1 жестко привязан к процедурам?
Вот рушаться основы ООП...


 
Плохиш ©   (2010-04-28 17:37) [19]


> oldman ©   (28.04.10 14:07) [18]

> Вот рушаться основы ООП...

Не кидай в них страшными словами, им только зачётик спихнуть надо.


 
oldman ©   (2010-04-28 21:09) [20]


> Плохиш ©   (28.04.10 17:37) [19]
> Не кидай в них страшными словами


А страшными предметами можно?

Ну, елки-палки. Меняем memo на table. "Как мне процедуры1, изменяющей значение поля, передавать это значение в процедуру2 для обработки?"

ЗЫ: "А образование, как всегда, высшее" ©



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2010.08.27;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.49 MB
Время: 0.072 c
9-1185021098
AlexanderMS
2007-07-21 16:31
2010.08.27
Повторный вывод уже построенной сцены в OpenGL.


2-1270489278
Dr. Genius
2010-04-05 21:41
2010.08.27
Проблема с компонентом мониторинга ShellNotify


15-1274963922
azim
2010-05-27 16:38
2010.08.27
управление роботом


15-1269123425
tri3
2010-03-21 01:17
2010.08.27
Оформление патента


2-1267706023
А№
2010-03-04 15:33
2010.08.27
Приобразовать любой бинарный символ в код





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский