Wenn du das Editfeld in TDateTime umwandelst, dann hast du als Nachkommastellen die Stunden.
Multiplizierst du das mit 24, dann stehen die vor dem Komma. Dann kannst du den ganzen Wert einfach mit dem Stundenlohn multiplizieren:
Delphi-Quellcode:
Time:TDateTime;
Gearbeitet:Extended;
Time:=StrToTime(Edit1.Text);
Gearbeitet:=24*Time;
Edit2.Text:=FloattoStr(Gearbeitet*Stundenlohn);
Ist kurz auf dem Kopf rausgeschrieben, könnte teilweise falsch sein. Das Prinzip müsste aber funktionieren.