dbgrid ile ilgili

[cortex]

Selamlar,

Dbgrid ile mysql e bağlandım ok, alan adı yazı ve text olduğu için sınırsız, bu yüzdende dbgrid onu memo olarak gösteriyor bende öyle görünmesini istemiyorum ve atıyorum ilk 10 karakteri gözüksün ne yapmalıyım?

Yardımcı olursanız sevinirim...

[cortex]

nasıl yapıcam bunu? yanı zaten ilk 10 yazdırma işlemini bilmiyorum ayrıntılı anlatabilir misin?

[aslangeri]

S.A.
eğer table kullanıyorsan fieldseditörde sağ tıkla new field oluştur.string tipte. datatipini de calculated seç.
Tablonun oncalcfield olayında
yeni oluşturduğun alana değer atayacaksın.
Bir diğer yolda memo alanın ongettext eventine

Kod: Tümünü seç

procedure TFMalzemeler.TMalzemeListMAMULGetText(Sender: TField;
  var Text: String; DisplayText: Boolean);
var
i:byte;
begin
  i:=10;
  if sender.asstring<>'' then
  begin
     if length(sender.asstring)<10 then i:=length(sender.asstring);
     text:=copy(sender.asstring,1,i);
  end;
end;

yazabilirsin.
Yukardaki kod çalışan bir kod yeni test ettim.
Aslında bende buna benzer bir soru sormak için gelimiştim iyi denk geldi.
Yalnız benim bir problemim daha var. Memo alana birden fazla satır ekleyince satır arasına #$D#$A ekliyor. yukardaki kodla birden fazla satır geldiği zaman araya kutu karakterleri koyuyor.
Bunu nasıl engelleyebiliriz.
Kolay gelsin...