Karekter atma

[dogan]

Merhaba;

Databasede masaadı alanında yaklaşık 35 kayıt var;

Örnek:
MASA 1
MASA 2
MASA 3
MASA 4, Olarak databasede kayıtlı "StringReplace ve delete" gibi farklı komutlar kullandım fakat bir türlü (MASA) karekterlerini silediremedim. StringReplace ile denediğimde databasede, 35 masa olmasına rağmen sürekli aynı kayıt listeleniyor StringReplace iptal edince listeleme normal oluyor...

Kod: Tümünü seç

    DBMAS := StringReplace(FieldByName('MASAADI').Value, 'MASA', '', [rfReplaceAll]);

MASA 1
MASA 2
MASA 3

1
2
3 bu şekilde nasıl alabilirim?

[freeman35]

Copy(S, length(xxx), Length(S) - length(xxx)); gibi

[alguli]

Freeman'ın önerisi doğrultusunda; eğer MASAADI field içeriği örneklerde olduğu gibiyse kod aynen şu şekilde olacaktır.

DBMAS := Copy(DatasetAdı.FieldByName('MASAADI').AsString,6, Length(DatasetAdı.FieldByName('MASAADI').AsString)-5);

Kolay gelsin.

[ertank]

Kod: Tümünü seç

    DBMAS := StringReplace(FieldByName('MASAADI').Value, 'MASA', '', [rfReplaceAll]);

Senin yazdığın kod doğru. MASAADI alanının değeri içinden MASA ifadesini kaldırır. Geriye kalanı çevirir. Bu bilgi içinde boşluk karakterleri de olacaktır. Dolayısı ile aşağıdaki şekilde kullanman daha doğru olacaktır.

Kod: Tümünü seç

DBMAS := Trim(StringReplace(FieldByName('MASAADI').AsString, 'MASA', EmptyStr, []);

Yukarıda Özellikle veri tipi dönüşüm sorunu yaşamamak adına ".AsString" şeklinde alana erişim sağlıyoruz. Zaten database içinde bir alanda birden fazla MASA ifadesi geçmediğini bildiğimiz için frReplaceAll seçeneğini kullanmıyoruz.

Bununla birlikte senin yazığın kod ile örnek verilen kod arasında ciddi bir farklılık yok. Ancak bizimle kısmi kod paylaşımı yaptığın için DBMAS değişkenini ne şekilde kullandığını ve database'i ne şekilde güncellediğini bilemiyoruz ki senin sorunun yüksek ihtimalle bu noktada.