Witam,
proste pytanie: **jak narysować krzyżyk na ekranie w miejscu określonym w zmiennej **
pt: TPoint
?
Chodzi mi o uzyskanie dwóch skrzyżowanych ze sobą lini, najlepiej żebym mógł określić ich grubość i kolor.
Póki co mam taki kod:
var
dc : THandle;
canvas : TCanvas;
begin
dc := GetWindowDc(Panel1.Handle);
canvas := Tcanvas.Create;
try
canvas.Handle := dc;
canvas.Brush.Color := clBlue;
//canvas.FillRect(Rect(20,2,2,7));
canvas.Brush.Color := clRed;
canvas.MoveTo(10,0);
canvas.LineTo(25, 0);
canvas.MoveTo(20,10);
canvas.LineTo(25,0);
// canvas.FrameRect(Rect(20,2,2,7));
finally
releaseDC(GetDeskTopWindow,dc);
canvas.Free;
end;
Ogólnie chodzi mi o to, że chcę stworzyć procedurę, do której przekażę uchywyt kontrolki/okna obcej aplikacji (np. przycisku) i chciałbym narysować krzyżyk w miejscu X i Y tego przycisku.
Za cholere nie wychodzi mi krzyżyk i nie mogę ustalić grubości linii ani koloru... nigdy nie rysowałem niczego po canvasie, i szczerze nie bardzo wiem jak to ugryźć.