Editleri birleştirerek Tek alana yazdırma

[vedatkaba]

Selaminaleyküm arkadaşlar hepinize kolay gelsin

Benim sorum şöyle

mesala 2 tane edit var ve bu editleri tabloda aynı alana yan yana nasıl kayıt yapcaz

örnek:

table1.fieldbyname('ADRES').assstring:=edit1.tezt+edit2.text;

ama olmuyor.

Editleri önce birleştirip sonra kayıt yaptırmak için denedim yine hata verdi.

hepinize kolay gelsin

[mepc]

Yazdığınız kodda (yazım yanlışları hariç) bir yanlışlık yok.

Hangi hatanın oluştuğunu yazabilirmisiniz.

[vedatkaba]

hata derken bahsettiğim aynı alana yanyana getirip yazmıyor.
alanın size ını kontrol ediyorum problem yok.

[mepc]

Peki alanı hangi veritabanında ve hangi türde tutuyorsunuz.

Kod: Tümünü seç

edit3.text:=edit1.text+edit2.text;

yazdığımda hiç problemsiz çalışıyor.

[vedatkaba]

tablo database veritabanı bde

[highmemo]

slm,

Adres alanının uzunluğu ne kadar...
birleştirerek verdiğin değerler kırpılıyor olabilir.. onu dışında çalışması gerekir..

[aydin038]

slm..

table1.Append;
table1.FieldByName('adres').AsString:=edit1.Text+' '+edit2.Text;
table1.Post;

fieltype- kontrol et.. integer mi stringmi..

[vedatkaba]

Tamam şimdi oldu.Bu sorun hallodu.

Şimdi aynı alandaki bilgileri 2 edite kaydettiğimiz gibi nasıl gösterebiliriz.Böyle bir şey yapmaya imkan varmı.
yada 2 tane dbeditte nasıl gösterebiliriz.Yarısını birinde yarısını ikincisinde.


Allah sizden razı olsun.

[Misafir]

tavsiyem bunları ayrı ayrı alanlarda saklaman ama illaki aynı alanlarda saklıyacaksan şu kodlara bi bak

kaydederken ;

Kod: Tümünü seç

table1ADRES.asstring:=edit1.text+'#'+'edit2.text;

# yerine belirleyeceğin ve bu alanda asla kullanılmayacak bi karakter seçmelisin.

gösterirken ;

Kod: Tümünü seç

edit1.text := copy(table1ADRES.asstring,0,(pos('#',table1ADRES.asstring)-1));
edit2.text := copy(table1ADRES.asstring,(pos('#',table1ADRES.asstring)+1),length(table1ADRES.asstring));

kolay gelsin.