formda çok fazla edit nesnesi oluşturduk bunların isimlerini ardaşık olacak şekilde biz düzenledik
örnek olarak
for i:0 to 50 do
memo1.lines(ks.text);
gibi birşey yapmak isityorum olmuyor ben Tedit(components(i)).text yaptığım zaman eğer editleri başka amaclı kullandığım bir edit olursa hata oluşturuyor bu şekilde gruplandırdığım editlerde çalışmak istiyorum
farklı sıradaki componentler
Forum kuralları
Forum kurallarını okuyup, uyunuz!
Forum kurallarını okuyup, uyunuz!
Re: farklı sıradaki componentler
Diyelimki Edit1 den Edit10 ulaşıcaksın
for döngüsüyle sayiyi 1 le 10 arasında dolaştırısan bu senin işini görür
TEdit(FindComponent('Edit'+sayi)).text
Edit yerine istediğin TEdit nesnesini ismini yazabilirsin
Kolay Gelsin
for döngüsüyle sayiyi 1 le 10 arasında dolaştırısan bu senin işini görür
TEdit(FindComponent('Edit'+sayi)).text
Edit yerine istediğin TEdit nesnesini ismini yazabilirsin
Kolay Gelsin
Re: farklı sıradaki componentler
lycan yazdı:formda çok fazla edit nesnesi oluşturduk bunların isimlerini ardaşık olacak şekilde biz düzenledik
örnek olarak
for i:0 to 50 do
memo1.lines(ks.text);
gibi birşey yapmak isityorum olmuyor ben Tedit(components(i)).text yaptığım zaman eğer editleri başka amaclı kullandığım bir edit olursa hata oluşturuyor bu şekilde gruplandırdığım editlerde çalışmak istiyorum
gruplandırmak istediğin editlerin tagını aynı ver örneğin bir tanesine 23 verdiysen diğerlerini de 23 ver ve sonra.
Kod: Tümünü seç
for i :=0 to ComponentCount-1 do
(if Components(i) is tEdit) then
if TEdit(Components(i)).Tag=23 then
Begin
....
End;