Einzelnen Beitrag anzeigen

Benutzerbild von bundy
bundy

Registriert seit: 24. Mai 2003
Ort: Eisenstadt
438 Beiträge
 
Delphi 2007 Architect
 
#7

Re: Was heisst Fensterhandle des OLE Elements nicht verfügba

  Alt 21. Nov 2006, 18:55
Ich hab den Fehler gefunden nach langem herumprobieren.
Ich weiß zar nicht ob es jemandem interessiert, aber ich poste mal die Lösung

Delphi-Quellcode:
program FTB_DVBClient;

uses
  uROComInit, //<<<<<------------ HIER kracht es !!
  Forms,
  MidasLib,
  fClientForm in 'fClientForm.pas{ClientForm},
  fClientDataModule in 'fClientDataModule.pas{ClientDataModule: TDAClientDataModule},
  ufmSucheStrasse in 'ufmSucheStrasse.pas{fmSucheStrasse},
  ufmAnlegen in 'ufmAnlegen.pas{fmAnlegen},
  ufmExportXLS in 'ufmExportXLS.pas{fmExportXLS};

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(TClientDataModule, ClientDataModule);
  Application.CreateForm(TClientForm, ClientForm);
  Application.CreateForm(TfmSucheStrasse, fmSucheStrasse);
  Application.CreateForm(TfmAnlegen, fmAnlegen);
  Application.CreateForm(TfmExportXLS, fmExportXLS);
  Application.Run;
end.
uROComInit ist eine Unit von RemObjects. Die beim verwenden der Komponenten automatisch dem Projekt hinzugefügt wird.

In ihr steht folgendes.

Delphi-Quellcode:
unit uROCOMInit;

{----------------------------------------------------------------------------}
{ RemObjects SDK Library - Core Library                                      }
{                                                                            }
{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
{ platform: Win32, Linux                                                     }
{                                                                            }
{ (c)opyright RemObjects Software. all rights reserved.                      }
{                                                                            }
{ Using this code requires a valid license of the RemObjects SDK             }
{ which can be obtained at [url]http://www.remobjects.com[/url].                        }
{----------------------------------------------------------------------------}

{$I RemObjects.inc}

interface

implementation

{$IFDEF MSWINDOWS}
uses ActiveX;

initialization
  CoInitializeEx(nil,COINIT_MULTITHREADED);

finalization
  CoUninitialize;
{$ENDIF}

end.
Wofür diese Unit ist, .... ich habe keine Ahnung, aber wenn ich sie aus meinem Programm entferne funktioniert es einwandfrei.
Und die Komponenten von RemObject & Dataabstract ebenfalls.

lg
Bundy
+++Glaube keiner Statistik, die du nicht selbst getürkthast.++++
********************
Ein anonymer Statistiker. *
********************
  Mit Zitat antworten Zitat