edit

[kamuran48]

selam,
dbedit içine bir text bilgi giriyorum.bu bilgi içinde bazı anahtar kelimeleri aratmak istiyorum.o anda kullandığım table de insert durumunda.nasıl yapabilirim.
iyi çalışmalar.

[vedatkaba]

Edit içindeki bilgide arama yapmak istiyorsan forumda çok örneği var pos diye arat sonuca ulaşırsın.table insert modunda derken neyi kasteddin anlamadım.

[zyildiz]

Bu aratma işini bir edit kullanıp editin onchenge ozelligine veya bilgi girişi tamamlandıktan sonra post butonunun altına yazabilirsiniz. insert into yardımıyla kaydedebilirsiniz. Bir if yardımıyla da yapacagınız işlemi (a tablosuna kaydet, b tablosuna kaydet) secebilirsiniz veya bir dbedit kullanıp yine post işlemine yazıp duruma gore (vt belirtmemişsiniz mesela firebird ise) commit ve rollback diye bilirsin.

[kamuran48]

pos ile harf aratmak mümkün anladığım kadarıyla.ben kelime aratmak istiyorum.bu mümkünmü
iyi çalışmalar

[vedatkaba]

Kod: Tümünü seç

pos(str1,str2)

str2 içinde str1 stringini arar bulursa bulduğu konumu bulamazsa 0 gönderir.Örnek olarak

Kod: Tümünü seç

var
         str1,str2:string;
  begin
  str2:='DELPHİTURKİYE'
  str1:='TURKİYE';
  pos(str1,str2);
  end;

 

Burda sonucu 7 olarak veriri çünkü TÜRKİYE 7 karakterden itibaren olduğunu geri dönderir.kolay gelsin.

[kamuran48]

aradığım kelimeyi bulduğu zaman 1 bulmadığı zaman 0 döndürüyor doğrumudur.

[Uğur1982]

merhaba;

Arkadaşlar yazmıs ama.şöyle yapabilirsin

Kod: Tümünü seç

if pos(str1,str2)>0 then
  ShowMessage('buldu');

Mantık, bulursa kaçıncı karakterden itibaren bulduğunu,
bulamazsa 0 gönderirir. Örnek için;

Kod: Tümünü seç

ShowMessage(IntToStr(pos(str1,str2)));

iyi günler....

[vedatkaba]

uğur arkadaşımız tamamlamış aynen öle ; kolay gelsin.

[oguzozturk74]

Böyle komutların aklınızda daha iyi kalması için İngilizce karşılıklarına bakmakta fayda var.
Mesela burda POS , Position ın kısaltılmışı .
Burada Position = Pozisyon yani konum anlamında olduğunu biliyoruz .