Ver Mensaje Individual
  #1  
Antiguo 21-04-2005
tiagor64 tiagor64 is offline
Miembro
 
Registrado: ene 2005
Posts: 48
Reputación: 0
tiagor64 Va por buen camino
problemas con el webbrowser

Hola:

Tengo un proble con el webbrowser, explico un poco el programa, es un programa que mediante un listado q recivimos de una bd access mostramos diferentes dibujos que hay en un directorio.

Pero resulta que en algunos problemas al abrir el browser me da el error
"Invalid floating point operation" lo raro es que en unos pcs me funciona y en otros no, todos ellos con el mismo S.O. WXP SP2 y el mismo navegador, no lo entiendo¿?

Os pego el codigo a ver si veis algo raro.

Código:
 procedure TFrmPrincipal.DBGrid1DblClick(Sender: TObject);
var
dibuix: string;
begin
RellenaEdits(dbgrid1.SelectedField.AsString);
   edtdesc2.Text := dbgrid1.datasource.DataSet.fieldbyname('descripcion').AsString;
   edtlargo2.Text := dbgrid1.datasource.DataSet.fieldbyname('largo').AsString;
   edtancho2.Text := dbgrid1.datasource.DataSet.fieldbyname('ancho').AsString;
   edtgrueso2.Text := dbgrid1.datasource.DataSet.fieldbyname('grueso').AsString;
   edtcara2.Text := dbgrid1.datasource.DataSet.fieldbyname('cara').AsString;
   edtprograma.Text := dbgrid1.datasource.DataSet.fieldbyname('programa').AsString;
   dibuix := dbgrid1.SelectedField.AsString;
If Not FileExists( '\\servidor2\bd\Programa\Piezas 2D\'+dibuix+'.jpg' ) Then
image1.Picture.LoadFromFile('c:\piezas\00000000.jpg')
else
image1.Picture.LoadFromFile('\\servidor2\bd\Programa\Piezas 2D\'+dibuix+'.jpg');
Frmbrowser.show;
Frmbrowser.WebBrowser1.Navigate('\\servidor2\bd\Programa\Piezas 3D\'+dibuix+'.html');

Gracias por buestra atencion.
Responder Con Cita