Fórum DbGrid quot;Urgentequot; #193274

06/11/2003

0

Olá Pessoal;

Estou inserindo Dados direto no Dbgrid. E gostaria de saber como que faço para deixar uma célula do Dbgrid igual um DBLookupComboBox.

Se alguem poder me ajudar ficarei grato...

Fernando Araujo. :D


Fernando Araujo

Fernando Araujo

Responder

Posts

06/11/2003

Edkardoso

Meu caro,

Te aconselho a procurar nas bancas a edição 44 da Clube Delphi - Segredos do DBGRID. Esta sensacional!!! Segue ai só um, dos muitos exemplos dessa maravilha:


procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin

// Torna DateTimePicker1 visivel caso o campo selecionado seja Data de NAsc.
DateTimePicker1.Visible:=DBGrid1.SelectedField =ClientDataSet1DATA_NASC;

if DateTimePicker1.Visible then
if gdFocused in State then
begin
// data que já está no campo
DateTimePicker1.Date:=ClientDataSet1DATA_NASC.AsDateTime;
// posiciona o componente sobre a célula
DateTimePicker1.SetBounds(rect.Left,Rect.Top,Rect.right-rect.Left,Rect.bottom-Rect.top);
end;


obs.: O exemplo é para outro componente e usando ClientDataSet. É só alterá-lo para a sua conexão e tabela.

obs1: Nesta mesma edição vc verá uma outra técnica: Campo calculado. Que é muito mais vantajosa do que criar um DBLookup sobre o DBGrid. Vá meu caro... corra às bancas.

Um abraço,

ed


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar