Hallo an alle,
ich möchte ein Programm machen mit dem man etwas in editfelder eingibt und diese Eingvabe dann aufgesplittet in Labeln erscheint. So hab ich das gelöst:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
nummer, ergebnis1: integer;
preis, ergebnis2: real;
name: string;
begin
nummer:= StrToInt (edit2.Text);
ergebnis1:= nummer;
Label2.Caption := IntToStr(ergebnis1);
preis:=StrToFloat (edit3.Text);
ergebnis2:=preis ;
Label3.Caption:= FloatToStr (ergebnis2) ;
name:= (edit1.Text);
name:= Label1.Caption;
name:=(Edit1.Text);
Label1.caption:=(name);
Funktioniert auch so wie ich will, allerdings soll mann jetzt in den editfeldern etwas anderes eintragen und dann sollen andere Labels ihre Aufschrift ändern, sodass die anderen immer noch den 1.Eintrag zeigen. Hat jemand ne Idee?
Danke schon mal im Voraus
nixalsverdruss