Board index » delphi » Delphi1 Component to 32Bit Component

Delphi1 Component to 32Bit Component

Hello...

First, thanks to all helping me convering a 80000 Line Delphi1
application to Delphi7. Your tips are very helpfull

My next problem is converting 16 Components to 32 Bit Components.

Some of them I can package very easy.

Now I am adding a component(copy paste from Delhi1) NumEdit.pas to a
new package. Following occurs.

A Window opens and tells me that I also have to "vclx.dcp" to my
package. I click OK. Now in the Package Windows I see the new addes
component xy.pas and xy.dcr. If I click on "Compile" in the
PackageWindow I do not get any error messages.

So far so good. Then I try to switch on the package. (I click Option
-> Package -> select my Package)
Then following error occurs:

***
Delphi7: delphi32.exe Uncorrect Image
Application or DLL c:windows32/system/toolhelp.dll is not a proper
Windows Image. Check the installed file.
***

(Im working with a japanese version, english error message could be
slightly different)

The following Error Message
Could not read CAN.bpl. Not a Win32 Application

On our Delphi1 System I found following files. Toolhelp.pas,
Toolhelp.dll. I copied this two files into my Delphi7 Enviroment. When
compiling the package its generates me a Toolhelp.dcu.

Any suggestion?

Thanks Michael, Tokyo

********Component Source (only header shown here)*******

unit NumEdit;

interface

uses
  WinTypes, WinProcs, SysUtils, Classes, Graphics,
  Controls, Forms, StdCtrls, Menus, Messages;

type
  TNumericEdit = class(TCustomEdit)
....
....
....
....
*************Toolhelp.pas (only header here)******************

{*******************************************************}
{                                                       }
{       Delphi Runtime Library                          }
{       Windows 3.1 API Interface Unit                  }
{                                                       }
{       Copyright (c) 1992 Borland International        }
{                                                       }
{*******************************************************}

unit TOOLHELP;

interface

uses WinTypes;

*************************************************************

 

Re:Delphi1 Component to 32Bit Component


You should not have copied those files.
D7 already has 32 bit versions of those files.
i would suggest you remove the D1 files.
its most likely its trying to access a 16 bit dll.
Quote
michi wrote:
> Hello...

> First, thanks to all helping me convering a 80000 Line Delphi1
> application to Delphi7. Your tips are very helpfull

> My next problem is converting 16 Components to 32 Bit Components.

> Some of them I can package very easy.

> Now I am adding a component(copy paste from Delhi1) NumEdit.pas to a
> new package. Following occurs.

> A Window opens and tells me that I also have to "vclx.dcp" to my
> package. I click OK. Now in the Package Windows I see the new addes
> component xy.pas and xy.dcr. If I click on "Compile" in the
> PackageWindow I do not get any error messages.

> So far so good. Then I try to switch on the package. (I click Option
> -> Package -> select my Package)
> Then following error occurs:

> ***
> Delphi7: delphi32.exe Uncorrect Image
> Application or DLL c:windows32/system/toolhelp.dll is not a proper
> Windows Image. Check the installed file.
> ***

> (Im working with a japanese version, english error message could be
> slightly different)

> The following Error Message
> Could not read CAN.bpl. Not a Win32 Application

> On our Delphi1 System I found following files. Toolhelp.pas,
> Toolhelp.dll. I copied this two files into my Delphi7 Enviroment. When
> compiling the package its generates me a Toolhelp.dcu.

> Any suggestion?

> Thanks Michael, Tokyo

> ********Component Source (only header shown here)*******

> unit NumEdit;

> interface

> uses
>   WinTypes, WinProcs, SysUtils, Classes, Graphics,
>   Controls, Forms, StdCtrls, Menus, Messages;

> type
>   TNumericEdit = class(TCustomEdit)
> ....
> ....
> ....
> ....
> *************Toolhelp.pas (only header here)******************

> {*******************************************************}
> {                                                       }
> {       Delphi Runtime Library                          }
> {       Windows 3.1 API Interface Unit                  }
> {                                                       }
> {       Copyright (c) 1992 Borland International        }
> {                                                       }
> {*******************************************************}

> unit TOOLHELP;

> interface

> uses WinTypes;

> *************************************************************

Other Threads