Hvordan ganger jeg 2 med det tal der står i min TEdit?

Hvis det er et heltal
2*StrToInt(Edit.Text);

Hvis det er komma tal
2*StrToFloat(Edit.Text);

Jeg kan ikke få det til at fungere.

Her er min kode:
adioButton2.Checked then Shellexecute(Handle, 'open', 'Shutdown.exe', PChar('-s -f -t '+ 60*StrToInt(Edit1.Text)), nil, SW_minimize);

Hvad gør jeg galt?

MvH. HenseWG

Glem "adioButton2.Checked then".

Shellexecute(Handle, 'open', 'Shutdown.exe', PChar('-s -f -t '+ IntToStr(60*StrToInt(Edit1.Text))), nil, SW_minimize);

Mange tak :) Smid et svar og du får dine point.

MvH. HenseWG

Lige en hurtig en.
Prøvede lige at putte en kommentar på:
Shellexecute(Handle, 'open', 'Shutdown.exe', PChar('-s -f -t '+ IntToStr(60*StrToInt(Edit1.Text)) +'-c "Hej"'), nil, SW_minimize);

Men nu virker det pludselig ikke mere?

MvH. HenseWG

Du mangler sikkert bare et mellemrum før -c
Shellexecute(Handle, 'open', 'Shutdown.exe', PChar('-s -f -t '+ IntToStr(60*StrToInt(Edit1.Text))+' -c "Hej"'), nil, SW_minimize);

Yup, det var det. Mange tak for det ;)