Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Deep-Sea,
21. Nov 2007
procedure TForm1.ListBox1Click(Sender: TObject);
begin
If ListBox1.ItemIndex > -1 then Edit1.Text := ListBox2.Items;
end;
Soweit war es ja klar ... oder?
procedure TForm1.Button1Click(Sender: TObject);
begin
If ListBox1.ItemIndex > -1 then ListBox2.Items := Edit1.Text;
end;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Deep-Sea,
21. Nov 2007
Ich dachte es handelt sich um ein Edit und kein Memo?
Etwas ungünstig oder? Ein Memo kann nun mal mehrere Zeilen beinhalten, eine einzige Zeile dagegen nicht, sonst wäre es ja auch keine Zeile mehr :P ...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Deep-Sea,
21. Nov 2007
Hört sich wieder einmal so an, als sei eine TListView besser dafür geeignet ...