Обработка OnObjectClick
Ситуация такая, есть 2 Мемо на MasterBand-e, например Мемо1 и Мемщ2, пишу обработчик OnObjectClick,
procedure TfTranslate.frSpravkaObjectClick(View: TfrView);
begin
if View.Name = 'Memo1' then
MessageBox(Handle, PChar(frSpravka.FindObject('MEMO2').Memo.Text), PChar(''), 48);
Т.е., хочу при клике на Мемо1 вывести MessageBox с содержимым Мемо2, но к сожалению ничего не получается, в таком случае получаю имя переменной которая в Мемо2.
procedure TfTranslate.frSpravkaObjectClick(View: TfrView);
begin
if View.Name = 'Memo1' then
MessageBox(Handle, PChar(frSpravka.FindObject('MEMO2').Memo.Text), PChar(''), 48);
Т.е., хочу при клике на Мемо1 вывести MessageBox с содержимым Мемо2, но к сожалению ничего не получается, в таком случае получаю имя переменной которая в Мемо2.