Timage & Tlabel

Тема в разделе "Borland C++ Builder & Kylix", создана пользователем neizerth, 15 фев 2009.

  1. neizerth

    neizerth Гость

    Есть два динамических массива (TImage & TLabel) из n элементов
    Как динамически связать i элемент массива TImage и i элемент массива TLabel чтобы при щелчке на i-ом элементе TImage вызывался обработчик для i-ого элемента TLabel?
    ...
    LabelArray[j]->OnClick = Label1Click;
    imgArray[j]->OnClick = LabelArray[j]->OnClick;
    ...
    void __fastcall TForm2::Label1Click(TObject *Sender)
    {
    Edit1->Text = dir+"\\"+((TLabel*)(Sender))->Caption;
    Form1->Quest3DCtlr21->SetChannelText(WideString("manchester"),WideStrin g("TextureFilename"),WideString(Edit1->Text));
    Form1->Quest3DCtlr21->SetChannelValue(WideString("manchester"),WideStri ng("ValueLoad"),1);
    }
     
  2. neizerth

    neizerth Гость

    Всем спасибо, проблема решена!
     
Загрузка...

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