Saya ingin tanya bagaimana ya bila TEdit isinya sudah saya format mengunakan format float(misal 2000 menjadi 2,000). Setelah itu saya ingin menambahkan dengan sebuah angka kok keluar message error(karena edit1.text nya bukan merupakan float)?? Bagaimana ya jalan pemecahannya??Tolong bantuin yah.. Trimsss

mas menuliskan kode itu di event apa? cara 1 usahakan sebelum mengubah format mas ubah semua karakter koma menjadi kosong, misal 222,222,222 menjadi 222222222 cara 2 mas menggunakan hint untuk menyimpan data aslinya, jadi yang mas format adalah data hint-nya jadi text hanya untuk menampilkan saja. cara 3 Silahkan kombinasikan keduanya.... cara 4 silakan menggunakan MaskEdit aja cara 5 silahkan menggunakan komponen tambahan aja ex Raize, alpha, devExpress, LMD dll msih banyak sekali yang lain

Waduuhh... saya masuh belum mengerti maksudnyaaa....masih pemulaa nihhh..Tolong penjelasannya lebih lanjut

Gini aja yang paling mudah pakdhe: 1. Waktu inisialisasi (OnCreate, OnShow ato pas ngasih default value-nya utk TEdit) simpan nilai sesungguhnya di sebuah variable (kalo bertype floating point). Kalo ngga' simpen di property Tag - nya si TEdit 2. Handle event OnEnter nya si TEdit, ganti text TEdit dengan nilai yang tersimpan dari Tag (misal kalo memanfaatkan Tag).

procedure Edit1Enter(Sender: TObject);
begin
{ Event procedure ini bisa dipake secara masal oleh TEdit lain yg berkelakuan sama, 
  arahkan aja event TEdit lain ke procedure ini }
  TEdit(Sender).Text:= IntToStr(TEdit(Sender).Tag);
end;

3. Handle event OnExit nya si TEdit, simpan perubahan nilai & kembalikan tampilan text sesuai dengan format yang diinginkan.

procedure Edit1Exit(Sender: TObject);
begin
{ Event procedure ini bisa dipake secara masal oleh TEdit lain yg berkelakuan sama, 
  arahkan aja event TEdit lain ke procedure ini }
  TEdit(Sender).Tag:= StrToIntDef(TEdit(Sender).Text, 0);  // simpan nilai
  TEdit(Sender).Text:= FormatFloat('#,0.00', TEdit(Sender).Tag);  // format tampilan
end;

Untuk mengantisipasi salah ketik, filter terlebih dahulu Charakter yang diinputkan dengan memanfaatkan event OnKeyPress (Gue dah pernah posting, silahkan cari) Semoga mudah dipahami hihihi... Regards, D.E