Copy Fobksiyonunu string içerisinde kullanmak

[kara_kule06]

Kolay gelsin.

bir string nesnesi içerisinde copy fonksiyonu nasıl çalışır. bunu bir örnekle göstereyim

Kod: Tümünü seç

assignfile(dosyaoku,odlg.FileName); reset(Dosyaoku);

        for i:=1 to tablodoldur.RecordCount do
        begin
        sql:=sql + tabloDoldur.FieldByname('alan_adi').AsString + ', ';
        value:= value + 'copy(veri' + ',' + inttostr(yersay) + ',' + tablodoldur.FieldByName('alan_len').AsString + ')' + ', ';
        yersay:=tablodoldur.FieldByName('alan_len').AsInteger + 1;
        end;


readln(Dosyaoku,veri);
showmessage(value);

burada copy fonksiyonu normal textmiş gibi oluyor. copy fonksiyonu çalışmıyor. bilen varsa yardım ederse sevinirim.

[aslangeri]

s.a.
copy yi normal text gib yazarsan normal text gibi görünür.
başındaki tırnak işaretini kaldırırsan gerçek copy ye ulaşabilirsin.
kolay gelsin.

[kara_kule06]

Galiba anlatamadım...

copy fonksiyonunu string içine gömmem gerekiyor. normalde yukarıdaki şekilde olmuyor. ama mesela fastreportta bir metin kutusunun içine delphide copy fonksiyonu gömülebiliyor. aşağıdaki gibi fastreporta gömebiliyorum.

Kod: Tümünü seç

frreport1.FindObject('memo12').Memo.Add([copy(deger,1,4)]);

işte aynen bunun gibi copy fonksiyonunu stringin içine gömmem gerekiyor ve stringi nerede kullanırsam copy i fonksiyonunuda parametreleri ile beraber çalıştırmam gerek. Bunu çözmem gerek yoksa tıkanırım...


Kolay gelsin...

[aslangeri]

ups ben yanlış anlamışım.
istediğiniz şeyi yapmak için string in içinde copy ifadesini aratacaksınız.
ondan sonraki parantez içindeki metni alacaksınız
aradaki "," leri kontrol ederek parametrelere gerekli değerleri atacaksınız.
biraz çetrefilli bir iş.
kolay gelsin.

[kara_kule06]

teşekkürler hocam.


Galiba dediğiniz gibi biraz çetrefilli olcak ama başka çarem yok.

Koplay Gelsin...