Et lille Problem =)

Tags:    delphi

Hej,

Dette er min første post her :)

Jeg har et lille problem =( Det består i at jeg ikke kan få vist mit resultat i en label.

Her er koden:

procedure TForm1.Button1Click(Sender: TObject);

Const
ZFW=133;
Fuel=33.3;
Var
Tspeed:string;
begin
Tspeed:=0.665*(ZFW+Fuel)+44.122;
label1.caption:=Tspeed;
end;

Den skriver: "Incompatible types: "String" and "Real"."

Martin

Arbejder på et =) LOL



2 svar postet i denne tråd vises herunder
1 indlæg har modtaget i alt 5 karma
Sorter efter stemmer Sorter efter dato

procedure TForm1.Button1Click(Sender: TObject);

Const
ZFW=133;
Fuel=33.3;
Var
Tspeed:string;
begin
Tspeed:=0.665*(ZFW+Fuel)+44.122;
label1.caption:=Tspeed;
end;

Den skriver: "Incompatible types: "String" and "Real".


De to Typer Real (tal med decimaler) og string (en streng) er jo langt fra det samme: du skal have fat i functionen FloatToStr for at få det til at virke (Float og Real er det samme):
Fold kodeboks ind/udKode 



Mvh
Kaare




procedure TForm1.Button1Click(Sender: TObject);

Const
ZFW=133;
Fuel=33.3;
Var
Tspeed:string;
begin
Tspeed:=0.665*(ZFW+Fuel)+44.122;
label1.caption:=Tspeed;
end;

Den skriver: "Incompatible types: "String" and "Real".


De to Typer Real (tal med decimaler) og string (en streng) er jo langt fra det samme: du skal have fat i functionen FloatToStr for at få det til at virke (Float og Real er det samme):
Fold kodeboks ind/udKode 



Mvh
Kaare


Er der noget galt, eller vil du bare ikke lukke?

Mvh
Kaare




t