Hur gör man en multiplikation i delph. Om man t.ex har en EditBox, där man fyller i ett tal och sen trycker man på en Button och då tar programet talet som står i EditBoxen gånger ett tal man färdigt har stoppat med i program koden och visar sedan upp resultatet i en Label.
Jag antar att man ska använda 'math' unit:en, men sen behöv jag hjälp

tack på förhand
-----------------
ruben
------

procedure TForm1.Button1Click(Sender: TObject);
begin
Label1.Caption := IntToStr(StrToInt(Edit1.Text) * 2);
end;

\\Micke

Hej
Ungefär samma svar men med Float

procedure TForm1.Button1Click(Sender: TObject);
Var
editTal : Double ;
begin
editTal := StrToFloat(Edit1.Text);
editTal := editTal * 133.14 ;
//133,14 exempel på dit fasta tal
Label1.Caption := FloatToStr(editTal) ;
end;

Se upp med decimalavskiljare i koden måste du ha punkt
I EditBoxen förmodligen , (komma) beroende på dina
nationella inställningar i Kontrollpanelen.

mvh
Sven