Arsip: [Ask]dbGrid dgn Background image
more 16 years ago
kabuki_enemy
Q mo tnya ada g ya, komponen dbGrid yg bisa di-load background image,..
thanx
more 16 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..
more 16 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
more 16 years ago
yusdi
coba pake smdbgrid..sudah ada properties backgroundnya.
coba donlot disini
http://www.scalabium.com/download/smcmpnt.zip
more 15 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
reply |
Report Obsolete
Last Articles
Last Topic
- PascalTalk #6: (Podcast) Kuliah IT di luar negeri, susah gak sih?
by LuriDarmawan in Tutorial & Community Project more 3 years ago - PascalTalk #5: UX: Research, Design and Engineer
by LuriDarmawan in Tutorial & Community Project more 3 years ago - PascalTalk #4: Obrolan Ringan Seputar IT
by LuriDarmawan in Tutorial & Community Project more 3 years ago - PascalTalk #2: Membuat Sendiri SMART HOME
by LuriDarmawan in Tutorial & Community Project more 3 years ago - PascalTalk #3: RADically Fast and Easy Mobile Apps Development with Delphi
by LuriDarmawan in Tutorial & Community Project more 3 years ago - PascalTalk #1: Pemanfaatan Artificial Intelligence di Masa Covid-19
by LuriDarmawan in Tutorial & Community Project more 3 years ago - Tempat Latihan Posting
by LuriDarmawan in OOT more 4 years ago - Archive
- Looping lagi...
by idhiel in Hal umum tentang Pascal Indonesia more 11 years ago - [ask] koneksi ke ODBC user Dsn saat runtime dengan ado
by halimanh in FireBird more 11 years ago - Validasi menggunakan data tanggal
by mas_kofa in Hal umum tentang Pascal Indonesia more 11 years ago
Random Topic
- fastreport 3 frxrcclass.dcu not found
by dinox in Tip n Trik Pemrograman more 17 years ago - delphi7+win7+zeos
by shafwah in MySQL more 12 years ago - Ask: How To Use ComPort 3.0 ?
by cyber_hecker in Network, Files, I/O & System more 18 years ago - otomatis click di caption pada sebuah form
by wati in Hal umum tentang Pascal Indonesia more 12 years ago - Trigger To Delphi
by umarbakri in Hal umum tentang Pascal Indonesia more 17 years ago - suatu saat di kelas delphi
by simba in Hal umum tentang Pascal Indonesia more 17 years ago - Validasi sesuatu yang unique...
by Random in Hal umum tentang Pascal Indonesia more 16 years ago - kiim file text ke database
by jajang in Hal umum tentang Pascal Indonesia more 15 years ago - tarsing stream to char
by greti in Hal umum tentang Pascal Indonesia more 15 years ago - bertanya tentang akses excel dan stringgrid
by muharmen in Tip n Trik Pemrograman more 14 years ago