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...,,,
Curtir tópico
+ 0
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
Clique aqui para fazer login e interagir na Comunidade :)