suhu2 delphi , mo nanya nich. wa lagi coba pake sql server 7. misal field namanya kodebrg tipe varchar (25). setelah di simpan kodebrgnya katakan nilainya 'A001'. terus g pake komponen adotable untuk mengambil data kodebrg tersebut. kok waktu tampilan kodebrgnya di tambah blank secara otomatis sich? isinya jadi kodebrg= 'A001 ' . sehingga waktu locate 'A001' selalu tidak ketemu.kenapa spasi ditambah otomatis apa kodeprogram wa ada yang salah. mohon pencerahannya. catatan wa ganti ke tipe char(25) hasilnya juga sama.ditambah spasi otomatis. mohon pencerahannya. thx b4

Coba pake NVARCHAR

@kaka-delphi: Coba pake NVARCHAR

kaka-delphi masih sama tuh uda di ganti ke nvarchar. kok masih tetep di tambah spasinya ya? bantuin dunk .binggung wa deh. thx b4.

pakai LTRIM or RTRIM, dihapus spacenya..

@akhadi: pakai LTRIM or RTRIM, dihapus spacenya..

kl itu uda wa coba sebelumnya. cuma kl kita tampilkan ke TDBEdit juga di tambahkan spasinya . kan tidak mungkin kita hapus terus kl data sudah banyak. penyebabnya kenapa ya? ada yg bisa bantu nga?

wah saya gak tahu kodenya wati, sebabnya kenapa, tapi coba pakai mainan string aja di delphinya... const space =#$20; function ltrim(const str: string): string; function rtrim(str: string): string; ----- ----- implementation function ltrim(const str: string): string; var len: byte absolute str; i: Integer; begin i := 1; while (i <= len) and (str[i] = space) do inc(i); ltrim := copy(str,i,len) end; function ltrim(str: string): string; var len: byte absolute str; begin while (str[len] = space) do dec(len); rtrim := Str end;

@akhadi: wah saya gak tahu kodenya wati, sebabnya kenapa, tapi coba pakai mainan string aja di delphinya... const space =#$20; function ltrim(const str: string): string; function rtrim(str: string): string; ----- ----- implementation function ltrim(const str: string): string; var len: byte absolute str; i: Integer; begin i := 1; while (i <= len) and (str[i] = space) do inc(i); ltrim := copy(str,i,len) end; function ltrim(str: string): string; var len: byte absolute str; begin while (str[len] = space) do dec(len); rtrim := Str end;

master akhadi , bukan mau hilangin stringnya. gw pake sql server 7+ delphi 6. misalkan fieldnya di sql server 7 itu kodebrg char(20) nah waktu di program wa pake TDBedit untuk isi kodebrg itu. setelah di isi kode barangnya katakan 'A001'; setelah di TAdotable.post; waktu gw pake TAdotable.locate untuk mencari kodebrg tersebut tidak ketemu2. lalu gw pake variable yg tipenya shorstring untuk mengambil kodebrg tersebut: temp := Tadotable.fieldbyname('Kodebrg').asstring; ternyata temp itu isinya = 'A001_____________________'; otomatis tambah spasi byk sekali. jadi bukan mau hilangin spasi .kenapa bisa di tambah spasi otomatis ya????? thx b4

@wati: suhu2 delphi , mo nanya nich. wa lagi coba pake sql server 7. misal field namanya kodebrg tipe varchar (25). setelah di simpan kodebrgnya katakan nilainya 'A001'. terus g pake komponen adotable untuk mengambil data kodebrg tersebut. kok waktu tampilan kodebrgnya di tambah blank secara otomatis sich? isinya jadi kodebrg= 'A001 ' . sehingga waktu locate 'A001' selalu tidak ketemu.kenapa spasi ditambah otomatis apa kodeprogram wa ada yang salah. mohon pencerahannya. catatan wa ganti ke tipe char(25) hasilnya juga sama.ditambah spasi otomatis. mohon pencerahannya. thx b4

Memang akan ditambah spasi secara otomatis oleh Delphi, baik type CHAR atau VARCHAR, bila panjang field kurang dari yang di definisikan. Secara umum, penyimpanan di tabel oleh db engine, CHAR akan di tambah spasi, VARCHAR apa adanya. Saran saya, untuk key jangan menggunakan type data VARCHAR, CHAR lebih baik karena panjangnya tetap. HTH

Coba di trace waktu proses post, apakah ada spasi ato tidak. kalo ya seperti yg akhadi bilang main2 pake string truncate (TRIM); temp := TRIM(Tadotable.fieldbyname('Kodebrg').asstring); Seharusnya kalo anda sudah pake varchar, maka spasi dibelakang karakter otomatis akan hilang

@herux: Coba di trace waktu proses post, apakah ada spasi ato tidak. kalo ya seperti yg akhadi bilang main2 pake string truncate (TRIM); temp := TRIM(Tadotable.fieldbyname('Kodebrg').asstring); Seharusnya kalo anda sudah pake varchar, maka spasi dibelakang karakter otomatis akan hilang

ternyata kaka delphi bener harus pake nvarchar baru tidak di tambah spasi. thanks semua pada memberi tanggapannya.sering2 bantuin gw dan gajarin ya. masih pemula delphi nich. GBU