Erro Simples

willianmr · 2 de julho de 2009

aÊ pessoal beleza?

Sou iniciante com delphi, mas já programo em outras linguagens

e esse código:

[B]procedure TForm1.Button1Click(Sender: TObject);
begin
  with BsRtf1 do
  begin
    Params.ParamByName('CODIGO').AsInteger:=
      StrToInt(Edit1.Text);
    ExecuteOpen;
  end;
end;
[/B]

gera estes 2 erros:

[Error]Unit1.pas(49): Declaration expected but end of file found

[Fatal Error] Atestados.dpr[5]: Could not compile used unit "Unit1.pas"

só que meu programinha, só tem um botão e uma caixa de texto. Como eu resolvo isso?

tenho certeza que é uma coisa miníma e que eu ainda não me dei conta

HELP!! <o>

foxchange · 3 de julho de 2009

procedure TForm1.Button1Click(Sender: TObject);

begin

with BsRtf1 do

begin

Params.ParamByName('CODIGO').AsInteger:=

StrToInt(Edit1.Text);

ExecuteOpen;

end;

end .

Não sei, mas não pode ser esse teu ultimo END ai que está com a pontuação errada???