Arsip: Menampilkan lebih dari satu kolom
more 16 years ago
zieborg
Gridnya jangan pake yang standar delphi, pake infopower, dijamain langsung bisa...he..he..
more 16 years ago
zieborg
infopower beli lagi..
maunya kayak itu kan? ini kalo mau manual ini kodenya :
procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
if (gdFocused in State) then
begin
if (Column.Field.FieldName = DBLookupComboBox1.DataField) then
with DBLookupComboBox1 do
begin
Left := Rect.Left + DBGrid1.Left + 2;
Top := Rect.Top + DBGrid1.Top + 2;
Width := Rect.Right - Rect.Left;
Width := Rect.Right - Rect.Left;
Height := Rect.Bottom - Rect.Top;
Visible := True;
end;
end
end;
procedure TForm1.DBGrid1ColExit(Sender: TObject);
begin
if DBGrid1.SelectedField.FieldName = DBLookupComboBox1.DataField then
DBLookupComboBox1.Visible := False
end;
procedure TForm1.DBGrid1KeyPress(Sender: TObject; var Key: Char);
begin
if (key = Chr(9)) then Exit;
if (DBGrid1.SelectedField.FieldName = DBLookupComboBox1.DataField) then
begin
DBLookupComboBox1.SetFocus;
SendMessage(DBLookupComboBox1.Handle, WM_Char, word(Key), 0);
end
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
dblookupcombobox1.visible := false;
dblookupcombobox1.DropDownWidth := 250;
dblookupcombobox1.Color := clMoneyGreen;
end;
koomponen yang diperlukan selain grid juga dblookupcombobox, yang nantinya masuk ke cell-nya grid.
good luck!
more 16 years ago
awonk
betullllll sekaliiii.....oce dech.. ntar saya coba dulu ya.....
makasih ya ilmunya....
trims
more 16 years ago
awonk
wah....wah.... codingnya betul sekali tuhhhh......
udah saya coba... hasilnya oke bosss....
maksih boss ya......
Salam
more 16 years ago
awonk
wah....wah.... codingnya betul sekali tuhhhh......
udah saya coba... hasilnya oke bosss....
maksih boss ya......
Salam
more 15 years ago
guardian_4n631
maaf... saya mau tanya nih
saya udah coba kode tersebut ,memang muncul combobox,
tapi kenapa ketika saya menambah record ,dan ingin memilih melalui combo, malah kembali ke record pertama.., tapi terkadang tidak ...
kenapa combonya suka ngaco gitu ..........????
more ...
- Pages:
- 1
- 2
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
- Update field menggunakan validasi jam
by lukersgn in Tutorial & Community Project more 12 years ago - pencarian record pada mysql
by f12dhaus in MySQL more 16 years ago - Problem dengan Novell
by murphy in Tip n Trik Pemrograman more 17 years ago - Grab Data yang masuk ke Printer
by zuyo in Network, Files, I/O & System more 16 years ago - AGAIN "Access Violation" pake directmysql .. Help
by detox in MySQL more 17 years ago - syntax error in from clause
by fongers in Hal umum tentang Pascal Indonesia more 13 years ago - mau tanya TmxAnyExport
by toing in Tip n Trik Pemrograman more 15 years ago - convert date format di MySQl
by dinoblackbox in MySQL more 15 years ago - [Fatal Error]Internal error LA30
by nekok in Tip n Trik Pemrograman more 13 years ago - Kok gak bisa nyimpen
by ick_jbr in Tip n Trik Pemrograman more 17 years ago