Gönderilme Tarihi: 10 Ara 2017 #1 MiRaT MiRaT 13 Kas 2017 2,077 Mesaj Aktiflik Seviye Deneyim TIM / GÖREV: Kod: procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer); var dc:hdc; begin dc:=getdc(0); Windows.LineTo(dc,x,y); end; end.
Kod: procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer); var dc:hdc; begin dc:=getdc(0); Windows.LineTo(dc,x,y); end; end.
