Haberler:

Forum VIP Üyeliği açılmıştır. Detaylı Bilgi almak için iletişim adresinden mesaj yazabilir yada Whatsapp üzerinden (05058048049) iletişime geçebilirsiniz. Teşekkürler.

Ana Menü

Memo içinde imlecin hangi satır ve kolonda olduğunu bulma

Başlatan Safirmedya, 06 Mart , 2011, 22:23:31

« önceki - sonraki »

0 Üyeler ve 1 Ziyaretçi konuyu incelemekte.

Safirmedya

// Memo içinde imlecin hangi satır ve kolonda olduğunu bulma
var
  LineNum:logint;
  CharsBeforeLine:logint;
begin
  LineNum:=SendMessage(Memo1.Handle,EM_LINEFROMCHAR,Memo1.SelStart,0);
  CharsBeforeLine:=SendMessage(Memo1.Handle,EM_LINEINDEX,LineNum,0);
  Label1.Caption:='Satır'+IntToStr(LineNum+1);
  Label2.Caption:='Kolon'+IntToStr((Memo1.SelStart-CharsBeforeLine)+1);
Bir insanın gerçek zenginliği, onun bu dünyada yaptığı iyilikleridir.

Hz.Muhammed

Safirmedya

Bir insanın gerçek zenginliği, onun bu dünyada yaptığı iyilikleridir.

Hz.Muhammed