Ich erzeuge zur Laufzeit einige EditFelder, nun möchte ich für diese Felder ein ONEXIT-Ereignis erzeugen.
Kann mir jemand von euch genau sagen was ich tun muß, oder mir den Code unten einsetzen.
Es gibt zwar überall Beispiele, aber ich kann Sie einfach nicht umsetzen, weil immer irgendetwas weggelassen oder vorausgesetzt wird (für einen Anfänger einfach zu hoch)
Mit Dank im voraus w.behrenz
Mein CODE:
//--------------------------
#include
#pragma hdrstop
#include "Unit1.h"
//----------------------------
#pragma resource "*.dfm"
TForm1 *Form1;
TEdit *A[20];
TEdit *AFeld;
//---------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//-------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
for (int i=0; i<5; i++)
{
AFeld=new TEdit(this);
AFeld->Parent=Form1;
A[i]=AFeld;
A[i]->Top=50+i;
A[i]->Left=10+i;
A[i]->Height=20;
A[i]->Width=50;
A[i]->Visible=true;
}
}
Kann mir jemand von euch genau sagen was ich tun muß, oder mir den Code unten einsetzen.
Es gibt zwar überall Beispiele, aber ich kann Sie einfach nicht umsetzen, weil immer irgendetwas weggelassen oder vorausgesetzt wird (für einen Anfänger einfach zu hoch)
Mit Dank im voraus w.behrenz
Mein CODE:
//--------------------------
#include
#pragma hdrstop
#include "Unit1.h"
//----------------------------
#pragma resource "*.dfm"
TForm1 *Form1;
TEdit *A[20];
TEdit *AFeld;
//---------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//-------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
for (int i=0; i<5; i++)
{
AFeld=new TEdit(this);
AFeld->Parent=Form1;
A[i]=AFeld;
A[i]->Top=50+i;
A[i]->Left=10+i;
A[i]->Height=20;
A[i]->Width=50;
A[i]->Visible=true;
}
}
Comment