procedure TForm10.FormCreate(Sender: TObject);
begin try
go_code:=true;
job_update:=false;
except end;End;