Delphi Forum

String olan bir alanda iki değer seçip, bu iki değer arasında kalan kayıtları gridde listelemek istiyorum.
Alan string olduğu için ">" ve "between" operatörlerini kullanamıyorum.

Daha önce yazdığım ve sizden gelen kodlar butonun click olayında gayet düzgün çalışlıyor. Ama ben bu kodlarla procedure oluşturduğumda aynı sonucu elde edemiyorum.

procedure tform1.mdiformac(gelenform:Tform; gelenformsinif:Tformclass);

Procedure ü tanımalrken yanlış bir değer tanımlamasımı ...

MFIChild olan formun onclose olayına aşağıdaki kodu yazdım.
Fakat form kapatılmadan tekrar procedure u çağıran butonu tıkladığımda form2 den tekrar açıyor.

procedure tform1.mdiformac(gelenform:Tform; gelenformsinif:Tformclass);
begin
if gelenform = nil then
begin
gelenform := gelenformsinif.Create(nil);
end
else
begin
gelenform.show;
end;
end;

Yukarıdaki kodları butonun Click olayına yazarsam doğru sonucu elde ediyorum:

procedure TForm1 ...

selam salvation.
view.datacontrol.recordcount:=10;
gibi bir kodla görünmesini istediğin kadar satırı gösterebilirsin.
kolay gelsin.