Lommeregner - Hvordan???

Tags:    delphi

Så har jeg endnu et spørgsmål...
Hvordan for man Delphi til at regne ud - f.eks. 4 + 5 = 9.
Da jeg først fik delphi og forsøgte at lave at "rigtigt" program troede jeg
at man bare skulle smide tre TEdit'er og en TButton ind på sin Form og så skrive i TButton OnClick:
<pre>
Edit3.text := Edit1.text + Edit2.text;
</pre>

Men det virkede jo ikke... 1 + 1 = 11 :-))
Men hvordan regner man så i Delphi???



Ses nok, ik' :-)[Redigeret d. 17/01-03 21:19:29 af Sniperworm]



2 svar postet i denne tråd vises herunder
1 indlæg har modtaget i alt 3 karma
Sorter efter stemmer Sorter efter dato
Så har jeg endnu et spørgsmål...
Hvordan for man Delphi til at regne ud - f.eks. 4 + 5 = 9.
Da jeg først fik delphi og forsøgte at lave at "rigtigt" program troede jeg
at man bare skulle smide tre TEdit'er og en TButton ind på sin Form og så skrive i TButton OnClick:
<pre>
Edit3.text := Edit1.text + Edit2.text;
</pre>

Men det virkede jo ikke... 1 + 1 = 11 :-))
Men hvordan regner man så i Delphi???



Ses nok, ik' :-)[Redigeret d. 17/01-03 21:19:29 af Sniperworm]



det skal nok være noget ala:
<pre>
Edit3.text := FloatTostr(StrToFloat(Edit1.Text) + StrToFloat(Edit2.Text));</pre>
-
neuroman? det' da mig :D
Aloha - Er du fresh???



GRunden hertil er:

Teksten fra en Edit er en såkaldt string (tekst streng) når du ligger sådanne to sammen, "knytter" du dem sammen...

F.eks vil resultatet af:
<pre>
var
X,Y:String;
begin
X := 'Hello ';
Y := 'World!';
Showmessage(X+Y);
end;
</pre>

blive en meddelelse der lyder "Hello World!"...

Hvis du vil ligge to tal sammen der er i to edit felter skal du derfor først konvertere stringsne til tal, Integers (heltal) eller floats (Decimal tal). Nu hvor det er en lommeregner ville det jo være bedst med decimal tal, derfor konverterer vi de to strenge til floats (med StrToFloat hvis det er decimal tal eller StrToInt hvis det er heltal), pludser dem, og konverterer dem herefter tilbage til en string ( FloatToStr hvis det er decimal tal eller IntToStr hvis det er heltal).
-
neuroman? det' da mig :D
Aloha - Er du fresh???



t