Arsip: [Ask]dbGrid dgn Background image

 
user image
more 12 years ago

kabuki_enemy

Q mo tnya ada g ya, komponen dbGrid yg bisa di-load background image,.. thanx
user image
more 12 years ago

xproof

yang sy tau cuma dbgrid transfarent.. procedure TForm1.DBGrid1DrawDataCell(Sender: TObject; const Rect: TRect; Field: TField; State: TGridDrawState); var Text: string; Rct: TRect; begin Text := Field.AsString; Rct:= Rect; BitBlt(DBGrid1.Canvas.handle, Rct.left, Rct.top, Rct.right - Rct.left, Rct.bottom - Rct.top, Image1.Canvas.Handle, Rct.left + DBGrid1.Left + Panel1.Left, Rct.Top + DBGrid1.Top + Panel1.Top, SRCCOPY); SetBkModE(DBGrid1.Canvas.Handle, TRANSPARENT); DBGrid1.Canvas.Font.Style := [fsBold]; DrawtextEx(DBGrid1.Canvas.Handle, PChar(Text), Length(Text), Rct, DT_WORDBREAK, nil); end; procedure TForm1.Panel1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); begin ReleaseCapture; Panel1.Perform(WM_SYSCOMMAND, $F012, SC_MOVE); Application.ProcessMessages ; BitBlt(GetDc(Panel1.Handle), 0, 0, Panel1.Width, Panel1.Height, Image1.Canvas.Handle , Panel1.Left, Panel1.Top, SRCAND); DBGrid1.refresh; end; mangga dicobi..tp sy jg blm pernah mencobanya sih..tp mudah2an dpt membantu..
user image
more 12 years ago

kabuki_enemy

bro,..ko gak bisa ya,.. tuh yang keisi gambar, koq malah panelx.. yg dbgrid g berubah,... ato ad langkah-langkah yg Q kelewat
user image
more 12 years ago

yusdi

coba pake smdbgrid..sudah ada properties backgroundnya. coba donlot disini http://www.scalabium.com/download/smcmpnt.zip
user image
more 12 years ago

j3free

kk... bikin dbGrid kalo di pilih... yang di select nya satu baris, bukan satu field (kaya standardnya) gimana kk? TQ sebelomnya kk
more ...
  • Pages:
  • 1
Share to

Random Topic

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