Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

gzofera

memo e dbdrig problemas

Recommended Posts

como assim???? como eu faco??? nao entendi direito, tah ai meu codigo para darem uma olhada e verem onde estou errando

 

procedure TForm1.Button2Click(Sender: TObject);

var i:integer;

SE:TSchemaInfo;

begin

 

If Memo1.Lines.Count > 0 Then

try

With ADOQuery1 do

begin

If Active then Active := False;

ADOQuery1.SQL := Memo1.Lines;

ADOQuery1.Open;

end;

//Change appearance of the DBGrid

for i:=0 to DBGrid1.Columns.Count-1 do

DBGrid1.Columns.Width:=50;

except

ShowMessage('Invalid MDX query');

end;

 

end;

Compartilhar este post


Link para o post
Compartilhar em outros sites

A linha que aparece o memo1 no memo1 e a linha 0.

você pode limpar ela usando esse codigo no events OnCreate(FormCreate) do form:

 

if memo1.Lines.ValueFromIndex[0]='emo1' then

begin

memo1.Lines.ValueFromIndex[0]:='';

end;

 

http://forum.imasters.com.br/public/style_emoticons/default/seta.gif Sendo memo1 o nome do Tmemo;

http://forum.imasters.com.br/public/style_emoticons/default/seta.gif caso nao der serto 1º tente por Memo1 no lugar de emo1 2º tente por Memo no lugar de emo1

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.