Arsip: stringgrid supaya tulisan rata kanan?

 
user image
more 18 years ago

gold3n_b0y

bagaimana ya supaya data yang ditulis di stringgrid bisa rata kanan, bila ingin memasukkan angka. dan bagaimana cara agar angka yang dimasukkan ke stringgri ada titiknya, misal 1.000, 1.000.000 (seperti currency). Thx
user image
more 18 years ago

machomen

dari pada tanya terus.. coba ikutan rembug jwb ah.. kalo salah mohon di maklumin ya... newbe banget ne... CMIIW menurut sy manfaatkan fasilitas OnDrawCell milik String Grid. For Examples : Asumsi colom 2 sebagai data integer procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer; Rect: TRect; State: TGridDrawState); Var Text : TLabel; begin IF ACol = 2 Then Begin Try Text := TLabel.Create(Nil); Text.Caption := Formatfloat('#,#0.00',StrToFloat(StringGrid1.Cells[acol,arow])); with StringGrid1.Canvas Do Begin FillRect(Rect); TextOut(Rect.Right-(Text.Width+2),Rect.Top +2,Text.Caption); End; Except End; End; end; mgkn ini cara yg paling sederhana.. maklum la.. jawaban Newbe..
user image
more 18 years ago

machomen

pake apa ya?? buat code biar bisa ky master2x yg laen... bisa di expand or Contract..
user image
more 18 years ago

LuriDarmawan

pake apa ya?? buat code biar bisa ky master2x yg laen... bisa di expand or Contract..
waktu nulis kode, cara menulisnya begini:
[code]isi kode lengkapnya[/code]
misal:
more ...
  • Pages:
  • 1
Share to

Random Topic

Local Business Directory, Search Engine Submission & SEO Tools FreeWebSubmission.com SonicRun.com