[DELPHI] Muovere un Form senza bordo e barra del titolo

[carmelo81]

ciao...
allora, ho una form tutta coperta da un timage e senza il bordo superiore, domanda:
1) con quale comando devo agire se voglio spostare la form mettendomi con il cursore del mouse sopra la 'timage'?
ciao e grazie

[alka]

Leggi questo tip.

[carmelo81]

grazie alka, ma ho già provveduto con questo (lo posto perche potrebbe essere utile):

procedure TForm1.Image1MouseDown(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;

ciao e ty ancora