| |
| |||||||
| Programlama Delphi,Visual Basic,C/C++,Pascal,Python,Kylix,Lazarus,Glade,Perl,Mono vb yazılımlar hakkında döküman paylaşabileceğiniz ve soru sorabileceğiniz forum alanızımıdır. |
| Tags: aktif, alma, karakter, memonun, satirdaki, sayisi |
  |
| | LinkBack | Konu Araçları |
03-12-2009
| #1 (permalink) | |||||||||||||
|  memo'nun aktif satırdaki karakter sayısı alma Bu Alana Reklam Vermek İstiyorsanız Buraya Tıklayınız procedure TForm1.Memo1Click(Sender: TObject); var satir:integer; begin with (Sender as Tmemo) do begin satir:= Perform(EM_LINEFROMCHAR,SelStart,0); SelStart := Perform(EM_LINEINDEX, satir, 0); SelLength:=Length(Lines[satir]); label1.caption:=inttostr(memo1.SelLength); end; end;
__________________ !!!FORUMDAKİ ONLİNE FİLMLERİ (DivX) NASIL İZLERİM!!![Linkleri görebilmek için üye olmalısınız. Üye olmak için tıklayınız...] [Linkleri görebilmek için üye olmalısınız. Üye olmak için tıklayınız...] [Linkleri görebilmek için üye olmalısınız. Üye olmak için tıklayınız...] [Linkleri görebilmek için üye olmalısınız. Üye olmak için tıklayınız...]  [Linkleri görebilmek için üye olmalısınız. Üye olmak için tıklayınız...] [Linkleri görebilmek için üye olmalısınız. Üye olmak için tıklayınız...] | |||||||||||||
|       |
| Konuyu Beğendin mi ? O Halde Konuyu Arkadaşınız ile Paylaşın =) |
| Okumuş Olduğunuz Sayfayı E-Mail ile Arkadaşınız ile Paylaşın ! |
|
| Bookmarks |
| Şu an bu konuyu görüntüleyen kullanıcı sayısı: 1 (0 üye ve 1 misafir) | |
| Konu Araçları | |
| |
