Ai vai pelo que o pessoal ta falando sobre utilizar os DBgrid, bem se quiser usar mesmo um stringgrid e tiver os componentes da Jedi utiliza o componente JvgVertDBSGrid1(é um string grid disfarçado hehehehe) , aí é so ligar seu adotable na propriedade datasource , que ta resolvido.
_____ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Márcio Ricardo Enviada em: 17 de abril de 2007 11:19 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Re: String Grid com banco de dados Access Prioridade: Alta Kra no DBgrid é só ligar o DataSource do DBGRID com um componente TDataSource e a opção DataSet do DataSource liga o AdoTable seu. No evento show do form, vc dá um open no AdoTable, pronto seus dados estão na grid. ----- Original Message ----- From: Gustavo André de Freitas To: [EMAIL PROTECTED] <mailto:delphi-br%40yahoogrupos.com.br> os.com.br Sent: Tuesday, April 17, 2007 10:38 AM Subject: [delphi-br] Re: String Grid com banco de dados Access Quem puder ajuda então, como faço para inserir esses dados que estão indo pro string grid num dbGrid? segue o código atual: procedure TForm1.Monitorar; var hprinter:thandle; bytesneeded,numjobs,i,ii:cardinal; pj:pjobs; begin hprinter := getcurrentprinterhandle(SGPrinter.Cells [0,linhaprinterselecionada]); try // EnumJobs(hprinter,0,100,1,nil,0,bytesneeded,numjobs); EnumJobs(hprinter,0,1000,2,nil,0,bytesneeded,numjobs); pj := AllocMem(bytesneeded); if not EnumJobs(hprinter,0,1000,2 {1},pj,bytesneeded,bytesneeded,numjobs) then RaiseLastWin32Error; // if numjobs = 0 then // else begin for i := 0 to StringGrid1.ColCount -1 do for ii := 0 to StringGrid1.RowCount -1 do StringGrid1.Cells [i,ii] := ''; StringGrid1.Cells[0,0] := 'Nome do documento'; StringGrid1.Cells[1,0] := 'Status'; StringGrid1.Cells[2,0] := 'Proprietário'; StringGrid1.Cells[3,0] := 'Páginas'; StringGrid1.Cells[4,0] := 'Enviado'; StringGrid1.Cells[5,0] := 'Tamanho'; StringGrid1.Cells[6,0] := 'Cód. Status'; if numjobs<>0 THEN BEGIN StringGrid1.RowCount := numjobs+1; for i := 0 to pred(numjobs) do begin StringGrid1.Cells[0,i+1] := pj^[i].pDocument; StringGrid1.Cells[1,i+1] := getstatus(pj^[i].status); StringGrid1.Cells[2,i+1] := pj^[i].pUserName; StringGrid1.Cells[3,i+1] := inttostr(pj^[i].TotalPages); StringGrid1.Cells[4,i+1] := getdatajob(pj^[i].Submitted); StringGrid1.Cells[5,i+1] := copy(FloatTostr(pj^ [i].Size/1024),1,1+pos(',',FloatTostr(pj^[i].Size/1024)))+' KB'; //FormatFloat('###,##0.0 KB',trunc((pj^[i].Size/1024)/0.1)/10); jobids[i+1] := pj^[i].JobId; StringGrid1.Cells[6,i+1] := inttostr(pj^[i].Status);//+' - '+inttostr(jobids[i]); end; end; // end; finally ClosePrinter(hprinter); end; end; --- Em [EMAIL PROTECTED] <mailto:delphi-br%40yahoogrupos.com.br> os.com.br, "Rubem Nascimento da Rocha" <[EMAIL PROTECTED]> escreveu > > Companheiro, a experiência diz, e também quem trabalha com grandes > quantidades de dados comprova isso, que fazer a carga e a apresentação dos > dados de forma manual, sem fazer uso de controles data-aware (que são > próprios para isso), é uma prática questionável, uma vez que isto impacta > diretamente no tempo de resposta que sua aplicação terá. > > Prefira usar TDBGrid ao invés de TStringGrid, pois o TDBGrid é um controle > de grid preparado para exibição de dados a partir de um dataset proveniente > (ou não) de uma conexão com um banco de dados. > > Sds. > > > >From: Gustavo André de Freitas <[EMAIL PROTECTED]> > >Reply-To: [EMAIL PROTECTED] <mailto:delphi-br%40yahoogrupos.com.br> os.com.br > >To: [EMAIL PROTECTED] <mailto:delphi-br%40yahoogrupos.com.br> os.com.br > >Subject: [delphi-br] String Grid com banco de dados Access > >Date: Mon, 16 Apr 2007 20:28:52 -0000 > > > >Pessoal, > > > >tenho uma StringGrid que recebe alguns dados na minha aplicação e > >queria que esses dados fossem gravados num banco de dados, a princípio > >esse banco seria o Access, gostaria de saber como faço para linkar (?), > >essa StringGrid com o banco de dados. estou usando adoconection e > >adotable... > > > >Desde já agradeço a ajuda de todos! > > > >Gustavo André de Freitas > > > > __________________________________________________________ > MSN Hotmail, o maior webmail do Brasil. http://www.hotmail. <http://www.hotmail.com> com > [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
