Kullanıcı

Hoşgeldiniz Ziyaretçi. Lütfen giriş yapın veya kayıt olun.
E-posta adresinize aktivasyon iletisi gelmediyse lütfen buraya tıklayın.
03 Eylül 2010 13:45:20

Kullanıcı adınızı, şifrenizi ve aktif kalma süresini giriniz

Sohbet Penceresi

Son 5 Notlar:

25 AÄŸustos 2010 16:11:57
slm beyler
27 AÄŸustos 2010 10:00:56
arkadaşlar delphi ile fax nasıl gönderilir şeklinde konuya cevaplarınızı bekliyorum...
  XLG
01 Eylül 2010 17:00:37
arkdaÅŸlar admin kim ya
  XLG
01 Eylül 2010 17:00:55
bi maruzatım olacak ta
Bugün, 11:14:44
Arkadaşlar SUBHAN adlı arkadaşımızdan haberi olan var mı? Bir yıldır hiç siteye girmemiş? Sitesi de borçtan kapanmış. Başına bir şey mi geldi?

Show 50 latest

Gönderen Konu: ListBox'da Belirlenen Item'den AÅŸağını Yasaklamak  (Okunma sayısı 956 defa)

0 Üye ve 1 Ziyaretçi konuyu incelemekte.

Çevrimdışı Subhan

  • Kıdemli Üye
  • *****
  • İleti: 818
  • Rep: +1/-0
  • Cinsiyet: Bay
Konunun başlığı qarip oldu neyse Forma TListBox ve TEdit ekleyin
Edit'de yazılan (Edite yazılan ListBox itemin'de olma) itemden aşağı inmez
Sadece Aşağı yön tüşu basıldığında çalışıyor


procedure TForm1.ListBox1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);

var
   tmpPChar : PChar;
begin
     GetMem(tmpPChar, Length(Edit1.Text) + 1);
     StrPCopy(tmpPChar, Edit1.Text);
     ListBox1.Perform(LB_SELECTSTRING, 0, LongInt(tmpPChar));
     FreeMem(tmpPChar, Length(Edit1.Text) + 1);

end;

En Güzel Azeri Programlama Sitesi.

Proqramlasdirma.Com