kann ich mit einem edit feld noch einen text mit geben

[kurzer_newbie]

Hallo Leute

ich weiß nicht ob einer die frage versteht, ich versuche es mal zu erklären.

ich habe 3 editfelder wo man zahlen einträgt die als string einer variable zugewiesen werden
als

Delphi-Quellcode:

a := strtoint(edit1.text);//wert1
b := strtoint(edit2.text);//anzahl von wert1
c := strtoint(edit3.text);//wert2
d := strtoint(edit4.test);//anzahl von wert2

verwendet wird es so:

Delphi-Quellcode:

panel1.Caption:= ('...&test'+intostr(a)+'='+intostr(b)+'&test'+intostr(c)+'='+intostr(d)+'...');

ich hätte es aber ganz gern so das der wert von a fest mit dem edit2 verbunden ist zb. als label aber so das man es im formular nicht sieht.
also die person gibt die anzahl und ich hätte gern :
wenn anzahl > 0 dann (&test[wert1])-->als einen string oder wie auch immer '+intostr.....

ich hoffe man hat mich verstanden, ich möchte nur das &test12 zb. = a ist


gruß
Kurzer

[kurzer_newbie]

Hi

ich habe schon was gefunden

ich mache es erstmal so:

Delphi-Quellcode:

var
a: string;
b: integer;

begin
a:='&test12';
b:=strtoint(edit2.text);

panel1.caption :=('...'+a+'='+inttostr(b)+'....');
end;

vieleicht hat ja jemand noch was besseres, jetzt muß ich nur noch schauen wie ich alles verschwinden lass wenn

b=0 ist.

gruß
Kurzer

[kurzer_newbie]

Hi

und noch eine lösung:

Delphi-Quellcode:

begin
if strtoint(edit1.Text) > 0 then a1 := '&test18='+(edit1.Text);//wenn eingabe größer 0 ist dann erstelle a1 sonst nicht
if strtoint(edit2.Text) > 0 then b1 := '&test1='+(edit2.Text);

panel1.caption := ('....'+a1+''+b1+'....);

ich wußte garnicht das progen so einfach ist.

jetzt gehts ans speichern und laden der daten.


gruß
Kurzer