Konu: Memo Alanda Arama Yapmak
Memo alanındaki kayıtlarda bir cümle veya bir kelime aratmak istiyorum. Aradığım kelime veya cümlenin olup olmadığını nasıl öğrenebilirim?
Giriş yapmadınız. Lütfen giriş yapın yada kayıt olun.
fox4um » Veritabanı, Tablo, View, Index ve SQL Syntax » Memo Alanda Arama Yapmak
Memo alanındaki kayıtlarda bir cümle veya bir kelime aratmak istiyorum. Aradığım kelime veya cümlenin olup olmadığını nasıl öğrenebilirim?
Birden fazla yolu var. Oncelik sirasi vermeden:
lcAranan = "bul beni"
lcAra = '%'+m.lcAranan+'%'
select * from myTable where memoAlan like ?m.lcAra
select * from myTable where atc( m.lcAranan, memoAlan ) > 0
local loRX
loRX = Createobject("VBScript.RegExp")
with loRX
.Pattern = m.lcAranan
.IgnoreCase = .t.
.Global = .t.
endwith
select * from myTable where loRX.Test( memoAlan )
Dahasi da var.
Çetin hocam çok teşekkürler.
2.örnek bana uygun.
at ile atc arasındakif fark nedir?
atc() kullanirsan buyuk-kucuk harf ayrimi yok (atc() Case Ignore):
? atc('cetin', 'Cetin Basoz') > 0 && .T.
? at('cetin', 'Cetin Basoz') > 0 && .F.
Tekrar teşekkürler
Memo alanda;
1- Bir satır en fazla 80 karakter olsun, bir sayfada en fazla 60 satır olsun. Bu özellliklerde kaç sayfa olduğunu bulmak ve ileri geri butonları koyarak sayfalar arası geçişi nasıl yapabilirim?
2- aradığımız kelime veya cümleyi bulunca imlecin ilgili satırda setfocus olmasını nasıl sağlayabiliriz?
(örnek: aradığım kelime 5.sayfanın 35.satırınnda ise o sayfa ve satır ekrana gelsin)
Not: Memo alan Microsoft rich Textbox control objesi içinde.
fox4um » Veritabanı, Tablo, View, Index ve SQL Syntax » Memo Alanda Arama Yapmak