использование динамической компоненты

Тема в разделе "Delphi - FAQ", создана пользователем infeter, 13 апр 2006.

Статус темы:
Закрыта.
  1. infeter

    infeter Гость

    создал динамический компонент tlistbox. привязал к нему событие через свою процедуру. в этой процедуре могу определить как, например,

    Код (Text):
    procedure TFormMain.ClickMyList(Sender: TObject);
    var
    my: TListBox;
    memo: TMemo;
    begin
    my:=(Sender as TListBox);
    showmessage(my.Items.Strings[my.ItemIndex]);
    end;
    теперь МОЙ ВОПРОС. как Вы уже, наверное, заметили, я хочу передать имя выбранного значения tlistbox в TMemo. проблема в том, что эта TMemo тоже была создана динамически... имя, например, Memo0. как мне сослаться на Memo0 через переменную из моей процедуры, чтобы изменить там текст?

    я в тупике...
     
  2. Barmutik

    Barmutik Гость

    Хммм.. если я правильно понял то наужно найти компонент TMemo по его имени ...

    Можно предложить попробовать так:

    Код (Text):
    var
    AMemo: TMemo;
    AComponent: TComponent;
    begin
    ...
    AComponent := MainForm.FindComponent('Memo0');
    if AComponent <> nil then
     if AComponent is TMemo then
      AMemo := AComponent as TMemo
     else
      AMemo := nil
    else
     AMemo := nil
    Прошу обратить внимание на то что искать надо у того отца которому приналдежит компонент!
     
  3. infeter

    infeter Гость

    Для: Barmutik
    спасибо. м не здесь на форуме в КОМПОНЕНТАХ помогли.

    да. до этого я сначала не дорубился... но потом всё исправил... :)

    теперь работает. всем спасибо.
     
Загрузка...
Похожие Темы - использование динамической компоненты
  1. MartinSez06
    Ответов:
    1
    Просмотров:
    276
  2. lmike
    Ответов:
    5
    Просмотров:
    548
  3. ESWANT
    Ответов:
    1
    Просмотров:
    804
  4. solomonec
    Ответов:
    1
    Просмотров:
    1.423
  5. JohnLemon
    Ответов:
    0
    Просмотров:
    537
Статус темы:
Закрыта.

Поделиться этой страницей