Variablenfehler oder? ich weiß nichts mit den Fehlermeldungen anzufangen

[ItsMe1]

ja wie muss man das schreiben hab eigentlich auch noch nicht mit einer ComboBox gearbeitet

[DeddyH]

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  if ComboBox1.ItemIndex = 0 then
  begin
    w1:= floattostr((strtofloat(wm)/1000)*strtofloat(Edit1.Text));
    label16.Caption:= w1;
  end;
end;

[ItsMe1]

ok gut danke

[ItsMe1]

vielen Dank für diese schnelle Antwort damit haben sich auch alle anderen Fragen von selbst geklärt
Vielen vielen Dank

[p80286]

Entschuldigt aber hier sollte es auch rumsen:

Delphi-Quellcode:

private
    w1 , w2 , w3 , wm , ww , h1 , h2, h3 , hm , hw , s1 , s2 , s3 ,sm , sw : real;
    { Private-Deklarationen }
 ....
  if form1.ComboBox1.itemindex = 0 then  //oder was auch immer
  begin
    w1:= floattostr((strtofloat(wm)/1000)*strtofloat(Edit1.Text)); {da w1 als real definiert ist klappt das nicht}
      label16.Caption:= w1; {hier ebenso String oder Real ,daß ist hier die Frage}
  end;
end;

end.

Gruß
K-H