Fórum Caracteres extranho no editor do Delphi e não consigo abrir o editor #402955

13/06/2011

0



    Pessoal,

     Me ajudem , sei la o que foi que fiz , não deixa mais eu abrir o delphi pelo objeto e fica estes caractres verdes no fonte , ta ruim para programar , quem sab pode me dar uma força por favor


 Fica mais conforme exemplo abaixo

procedure TFrm_Cad_func.Bnt_InserirClick(Sender: TObject);£
Var  Vcod : String;£
 begin£
PageControl1.ActivePage := Dados; £
Bnt_gravar.Enabled    := true; £
 With Sql_Contador  do begin£
 …  close; £
 …  Sql.clear; £
 …  Sql.add('select max(CodigoSeg) as CodigoSeg from Tb_funcionario'); £
 …  Open; £
End; £
Dmbase.Tb_funcionario.insert; £
    IF  Sql_Contador['CodigoSeg'] <> null then£
    ...  Dmbase.Tb_funcionario['CodigoSeg'] := Sql_Contador['CodigoSeg'] + 1£
    Else£
    Dmbase.Tb_funcionario['CodigoSeg'] := '1'; £
    Sql_Contador.close; £
     //******************************************
    vcod :=   Dmbase.Tb_funcionario['CodigoSeg']; £
    While Length (vcod) < 6 do vcod  := '0' + vcod; £
    Dbedit2.Text := vcod; £
   O que tenho que fazer , onde mexer na configuração para corregir isso por favor

Américo Grespan...,,,

Américo Grespan...,,,

Responder

Posts

14/06/2011

Rafael Mattos

mas não atrapalha a compilação? é só uma unit que está assim ou todas?
Responder

Gostei + 0

05/05/2013

José

Este tópico esta sendo fechado por inatividade. Se necessário, sinalizar para que seja reaberto ou abrir um novo.
Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar