Gør applikationen borderløs når det rykk~ Er bedømt af 3 brugere Fra : niller Vist : 520 gange Dato : 01-12-00 21:56

procedure TForm1.PanelTopMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); begin if (Button=mbLeft) then begin ReleaseCapture; (Self as TControl).Perform(WM_SYSCOMMAND,SC_DRAGMOVE,0); end; end;

Bedømmelse Fra : Rellom Dato : 15-08-02 05:44

Bedømmelse Fra : katrin Dato : 21-08-02 22:51

Bedømmelse Fra : lavang Dato : 11-12-04 12:34

Du har følgende muligheder

Eftersom du ikke er logget ind i systemet, kan du ikke lave en bedømmelse til dette tip. Hvis du ikke allerede er registreret, kan du gratis blive medlem, ved at trykke på "Bliv medlem" ude i menuen.