Delphi Quellcode des Programms in Delphi übersetzen - Hilfe gesucht

Thema durchsuchen

Ansicht

Themen-Optionen

Quellcode des Programms in Delphi übersetzen - Hilfe gesucht

Ein Thema von KSebi · begonnen am 28. Nov 2005 · letzter Beitrag vom 2. Dez 2005

Vorheriger Beitrag

Nächster Beitrag

Daniel Schuhmann

Registriert seit: 16. Jul 2005
Ort: München
391 Beiträge

Turbo Delphi für Win32

#27

Re: Quellcode des Programms in Delphi übersetzen - Hilfe ges

1. Dez 2005, 17:44

Zitat von KSebi:

Ja und wie du wohl bemerkt hast, kann man da noch nix verschrieben, das hab ich noch net gemacht :/

zusammenfalten · markieren

Delphi-Quellcode:

			procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton;

  Shift: TShiftState; X, Y: Integer);

const 

  SC_DRAGMOVE = $F012;

begin

  if Button = mbLeft then

  begin

    ReleaseCapture;

    Form1.Perform(WM_SYSCOMMAND, SC_DRAGMOVE, 0);

  end;

end;