klavuz çizgisi

[boreas]

peki birşey soracağım. kılavuz çizgisi olarak arka planı siya ya da kırmızı olan bir panel koysan Yani tpanel'i  kılavuz çizgisi gibi kullansan

[narkotik]

Windows.SetParent (Panel1.Handle, ClientHandle);

buda handle olan nesneyi öne atıyor
hata verirse

    WinApi.Windows.SetParent(edit1.Handle, Panel1.Handle);

show olayına yazıp denermisin

[murtishow76]

(03-07-2018, Saat: 12:00)SimaWB Adlı Kullanıcıdan Alıntı: Sanırım ben çözümü buldum

Form üzerine bir Timer koyup Interval'ini 25 gibi küçük bir değer yapıyoruz. Sonrasında OnTimer'ına şunları yazıyoruz:

procedure TForm1.Timer1Timer(Sender: TObject);
var
 DC: HDC;
begin
 DC := GetWindowDC(Panel1.Handle);

// Renk vermek isterseniz aşağıdaki 2 satırı kullanın
 SelectObject(DC,  GetStockObject(DC_PEN));
 SetDCPenColor(DC, RGB(255, 0, 0));
//

 MoveToEx(DC, 100, 0, nil);
 LineTo(DC, 100, Panel1.Height);
 ReleaseDC(Panel1.Handle, DC);
end;

Sonuç:

peki bu çizgileri nasıl yok ederiz...