amigo esse artigo deve fazer o que vc deseja: pelo que entendi ele seta os campos q devem sofrer redimensionamento.. assim quando alterar o tamanho do form ele redimensionara para preencher todo os espaços do grid.. como vc quer apos as suas consultas entao eh soh acionar o procedimento apos ela
http://www.devmedia.com.br/articles/viewcomp.asp?comp=650 2009/11/30 Matheus Nabao <matheus_...@hotmail.com> > > O seu exemplo usa tamanho fixo para todos os campos. Deve ser estranho. > > Você pode fazer isso com arquivo, onde você define as especificações dos > tamanhos dos campos etc. E carrega na hora de criar a Grid. > > > > Mas afinal, o quê seria uma forma utilizável? > > > > To: delphi-br@yahoogrupos.com.br > From: stephen.wil...@ipswichhospital.nhs.uk > Date: Mon, 30 Nov 2009 15:50:09 +0000 > Subject: [delphi-br] Largura de colunas de DBGrid > > > > > > Senhores, > > Alguem tem uma formula para calcular a largura ideal das colunas em um > DBGrid em tempo de execucao? A consulta que alimenta o DBGrid produz campos > diferentes de cada execucao. > > No momento, isso funciona: > > for i:= 0 to DBGrid1.Fieldcount-1 do > DBGrid1.Columns[i].Width:= Ceil(DM.Q_Report.Fields[i].DisplayWidth * 2.5) ; > > .... mas gostaria de ter uma formula utilizavel. Ficaria muito grato por > quaisquer sugestoes. > > Att. > > Steve > > *************************************************************************** > > This e-mail and any files transmitted with it are confidential. If you are > not the intended recipient, any reading, printing, storage, disclosure, > copying or any other action taken in respect of this e-mail is prohibited > and may be unlawful. If you are not the intended recipient, please notify > the sender immediately by using the reply function and then permanently > delete what you have received. > > Content of emails received by this Trust will be subject to disclosure > under the Freedom of Information Act 2000, subject to the specified > exemptions, including the Data Protection Act 1998 and Caldicott Guardian > principles. > > This footnote also confirms that, unless otherwise stated, this email > message has been swept by Sophos Anti-virus for the presence of computer > viruses. > > ** Please consider the environment before printing this email. ** > > *************************************************************************** > > > > > > _________________________________________________________________ > Novo windowslive.com.br. Descubra como juntar a galera com os produtos > Windows Live. > http://www.windowslive.com.br/?ocid=WindowsLive09_MSN_Hotmail_Tagline_out09 > > [As partes desta mensagem que não continham texto foram removidas] > > > > ------------------------------------ > > -- > <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> > > > > -- Leandro, MuTukA [As partes desta mensagem que não continham texto foram removidas]