Hallo
hab ein Programm das mir nur das Formular zu verfügung stellt.
Buttons und Listboxen will ich zur Laufzeit erzeugen, und zwar in einer extra Unit.
Geht auch soweit nur auf die Ereignisse
der Kompnenten hab ich keinen Zugriff.
Kann mir jemand helfen
Beispiel
CppFile
void Start(TObject *Sender,int x,int y)
TForm *HForm=dynamic_cast<TForm*> (Sender);
DateiListe= new TListBox(HForm);
DateiListe->MultiSelect=false;
DateiListe->Width=145;
DateiListe->Height=105;
DateiListe->Left=x;
DateiListe->Top=y;
DateiListe->Color=clWindow;
DateiListe->Parent = HForm;
DateiListe->Visible=true;
! LADE TEXTE IN DIE LISTBOX !
DateiListe->SetFocus();
DateiListe->KeyDown = Keypressed;
void Keypressed(TObject *Sender, WORD &Key,TShiftState Shift)
HeaderFile:
void Keypressed(TObject *Sender, WORD &Key,TShiftState Shift);
hab ein Programm das mir nur das Formular zu verfügung stellt.
Buttons und Listboxen will ich zur Laufzeit erzeugen, und zwar in einer extra Unit.
Geht auch soweit nur auf die Ereignisse
der Kompnenten hab ich keinen Zugriff.
Kann mir jemand helfen
Beispiel
CppFile
void Start(TObject *Sender,int x,int y)
TForm *HForm=dynamic_cast<TForm*> (Sender);
DateiListe= new TListBox(HForm);
DateiListe->MultiSelect=false;
DateiListe->Width=145;
DateiListe->Height=105;
DateiListe->Left=x;
DateiListe->Top=y;
DateiListe->Color=clWindow;
DateiListe->Parent = HForm;
DateiListe->Visible=true;
! LADE TEXTE IN DIE LISTBOX !
DateiListe->SetFocus();
DateiListe->KeyDown = Keypressed;
void Keypressed(TObject *Sender, WORD &Key,TShiftState Shift)
HeaderFile:
void Keypressed(TObject *Sender, WORD &Key,TShiftState Shift);
Comment