txt dosyası içinde arama yapmak.

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
Kullanıcı avatarı
greenegitim
Üye
Mesajlar: 713
Kayıt: 28 Nis 2011 10:33
Konum: İstanbul

Re: txt dosyası içinde arama yapmak.

Mesaj gönderen greenegitim »

txt teyi bir memoya yükle
viewtopic.php?f=2&t=16767
Mücadele güzelleştirir!
varyemez
Üye
Mesajlar: 262
Kayıt: 01 Oca 2009 11:00
Konum: Bursa
İletişim:

Re: txt dosyası içinde arama yapmak.

Mesaj gönderen varyemez »

Delphi XE ve sonrasını kullanıyorsan uses kısmına RegularExpressions ekle.
yine memo1.lines.text içine yazını aktar.

var
regex: TRegEx;
input: string;
ciklar:TMatchcollection;
yyer: Integer;
yestr: string;
begin
i := 0;
input := memo1.lines.text;
regex.Create('test\.exe');

ciklar := regex.Matches('input,'test\.exe'); // text.exe leri arayacak ve bir arraya yerleştirecek

ciklar.count -> bulduklarının sayısını verir bulamazsa sıfır gelir

ciklar.Item[0].Value -> mesela ilk bulduğunun değerini verir.

ciklar.item[0].index -> konumu
.........
regex yaratma kuralları için http://www.regular-expressions.info/quickstart.html adresini inceleyebilirsin..
Cevapla