Delphi 7 ist definitiv
Win32. Und zur Mausbewegung: pack Dir ein TShape auf Dein Formular und nenn es shpSchlaeger. Dann klickst Du auf das Formular, wechselst im Objektinspektor auf den Reiter "Ereignisse" und machst einen Doppelklick neben "OnMouseMove". Dort trägst Du nun die Zeile
shpSchlaeger.Left := X - shpSchlaeger.Width div 2;
ein. Im Ganzen sollte das nun so aussehen:
Delphi-Quellcode:
procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
begin
shpSchlaeger.Left := X - shpSchlaeger.Width div 2;
end;
Nun F9 drücken und die Maus auf dem Formular bewegen.