Itens De Pedidos Como Alterar

[Guest brabbi]

Coloquei esse codigo dentro do botao alteraritens para q possa chamar o Form onde será carregado os dados e exibido dentro form, mas o form ate vem na tela mas os dados q é bom nada será que estou fazendo alguma coisa erra???????

begin

FrmCadItensCon:= TFrmCadItensCon.create(self);

with QRY_ITENSMOVIMENTO do begin

close;

SQL.Clear;

SQL.Text := 'select * from ITENSMOVIMENTO where ITEM =:ITEMOV';

ParamByName('ITEMMOV').AsString :=FieldByName('ITEM').AsString;

Open;

END;

With FrmCadItensCon do Begin

with QRY_ITENSMOVIMENTO do begin

DBT_Item.Caption := FieldByName('ITEM' ).AsString;

DESCRIMEMO.Text := FieldByName('DESCRICAO' ).AsString;

JUSTIMEMO.text := FieldByName( 'JUSTIFICATIVA' ).AsString;

Ativmemo.text := FieldByName( 'ATIVIDADE' ).AsString;

acaomemo.text := FieldByName( 'ACAO' ).AsString;

end;

FrmCadItensCon.showmodal;

END;

[Graymalkin]

Note que falta um "M" ali:

SQL.Text := 'select * from ITENSMOVIMENTO where ITEM =:ITEMOV';

ParamByName('ITEMMOV').AsString :=FieldByName('ITEM').AsString;

Não seria isso?

Abraços,

Graymalkin