Dieses Programm gibt einen ersten kurzen Einblick in die visuelle Programmierung mit dem EMBARCADERO RAD STUDIO.
//--------------------------------------------------------------------------- #include <vcl.h> #pragma hdrstop #include "Unit1.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.dfm" TForm1 *Form1; //--------------------------------------------------------------------------- __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) { } //--------------------------------------------------------------------------- void __fastcall TForm1::EditNachnameClick(TObject *Sender) { ShowMessage("Sie haben das Textfeld angeklickt"); } //--------------------------------------------------------------------------- void __fastcall TForm1::EditNachnameKeyPress(TObject *Sender, System::WideChar &Key) { EditCopy->Text=EditNachname->Text; } //---------------------------------------------------------------------------