Recent

Author Topic: convert Sebran delphi(4) code to lazarus  (Read 93931 times)

von_ks

  • Jr. Member
  • **
  • Posts: 57
Re: convert Sebran delphi(4) code to lazarus
« Reply #60 on: February 13, 2009, 02:08:33 pm »


I have tried to comment it out but no success.
I think it we should find the MPLAYE.res .
What do you think ?

Leledumbo

  • Hero Member
  • *****
  • Posts: 8262
  • Programming + Glam Metal + Tae Kwon Do = Me
Re: convert Sebran delphi(4) code to lazarus
« Reply #61 on: February 13, 2009, 02:15:17 pm »
Quote
I have tried to comment it out but no success.
Please be more specific. Can you compile the code? Does the executable run? What problems do you get?
Quote
I think it we should find the MPLAYE.res .
You mean, you ;).

Just a side question: How long have you been playing with Lazarus? Or in general, with programming?

von_ks

  • Jr. Member
  • **
  • Posts: 57
Re: convert Sebran delphi(4) code to lazarus
« Reply #62 on: February 13, 2009, 02:28:44 pm »


That is the result when I Try to compile the file.

Hint: Start of reading config file D:\lazarus\fpc\2.2.2\bin\i386-win32\fpc.cfg
Hint: End of reading config file D:\lazarus\fpc\2.2.2\bin\i386-win32\fpc.cfg
Free Pascal Compiler version 2.2.2 [2008/10/05] for i386
Copyright (c) 1993-2008 by Florian Klaempfl
Target OS: Win32 for i386
Compiling package01.pas
Compiling D:\delphi\consts.pas
Writing Resource String Table file: consts.rst
Compiling MPlayer.pas
D:\Temp\MPlayer.pas(101,15) Warning: An inherited method is hidden by "TMediaPlayer.SetVisible(TButtonSet)"
D:\Temp\MPlayer.pas(239,14) Fatal: illegal character "'}'" ($7D)

I do not have so many Experience with Lazarus, just few weeks.
But earlear I have developed software.


Vincent Snijders

  • Administrator
  • Hero Member
  • *
  • Posts: 2661
    • My Lazarus wiki user page
Re: convert Sebran delphi(4) code to lazarus
« Reply #63 on: February 13, 2009, 02:52:37 pm »
uncomment it by adding // at the start of the line.

Delphi and fpc in delphi mode cannot handle nested comments.

Legolas

  • Full Member
  • ***
  • Posts: 117
    • http://itaprogaming.free.fr
Re: convert Sebran delphi(4) code to lazarus
« Reply #64 on: February 13, 2009, 03:45:33 pm »
I have tried to comment it out but no success.
I think it we should find the MPLAYE.res .
What do you think ?

Have you even tried to delete that line at all?
However, as Vincent already have said, there are some problems with nested comments, so you could try to replace it with something like (notice the blank space before "{" ):

Code: [Select]
{ $R MPLAYER }

von_ks

  • Jr. Member
  • **
  • Posts: 57
Re: convert Sebran delphi(4) code to lazarus
« Reply #65 on: February 13, 2009, 04:04:20 pm »


Hi Vincent

I am glad to see you again.

Yes it could helped. MPlayer is now compiled.

The compiler is now standing at other line at ResultString[0]

 begin
  { Read the string length stored in the first byte. }
  stringLength := ReadByte;

  { Store the string length. }
  {$IFDEF VER90}
  SetLength(ResultString, StringLength);
  {$ELSE}
  ResultString[0] := Chr(StringLength);
  {$ENDIF}

the whole compiler messege is

Hint: Start of reading config file D:\lazarus\fpc\2.2.2\bin\i386-win32\fpc.cfg
Hint: End of reading config file D:\lazarus\fpc\2.2.2\bin\i386-win32\fpc.cfg
Free Pascal Compiler version 2.2.2 [2008/10/05] for i386
Copyright (c) 1993-2008 by Florian Klaempfl
Target OS: Win32 for i386
Compiling package01.pas
Compiling D:\delphi\consts.pas
Writing Resource String Table file: consts.rst
Compiling MPlayer.pas
D:\Temp\MPlayer.pas(101,15) Warning: An inherited method is hidden by "TMediaPlayer.SetVisible(TButtonSet)"
D:\Temp\MPlayer.pas(283,52) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(434,42) Hint: Parameter "Color" not used
D:\Temp\MPlayer.pas(104,33) Hint: Parameter "YPos" not used
D:\Temp\MPlayer.pas(123,23) Hint: Parameter "Button" not used
D:\Temp\MPlayer.pas(124,27) Hint: Parameter "Button" not used
D:\Temp\MPlayer.pas(111,31) Hint: Parameter "Message" not used
D:\Temp\MPlayer.pas(113,30) Hint: Parameter "Message" not used
D:\Temp\MPlayer.pas(115,31) Hint: Parameter "Message" not used
D:\Temp\MPlayer.pas(149,38) Hint: Parameter "Shift" not used
D:\Temp\MPlayer.pas(859,49) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(909,60) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(954,57) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(989,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1011,57) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1041,58) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1061,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1121,57) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1179,57) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1207,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1251,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1278,60) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1299,60) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1325,57) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1335,47) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1346,49) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1357,49) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1384,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1428,58) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1442,61) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1476,61) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1498,58) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1512,60) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1529,53) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1534,53) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1539,53) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1544,53) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1549,53) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1558,58) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1571,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1582,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1593,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1603,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1613,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1624,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1705,36) Hint: Converting the operands to "Int64" before doing the add could prevent overflow errors.
D:\Temp\MPlayer.pas(1705,36) Hint: Converting the operands to "Int64" before doing the multiply could prevent overflow errors.
D:\Temp\MPlayer.pas(1706,18) Hint: Converting the operands to "Int64" before doing the multiply could prevent overflow errors.
D:\Temp\MPlayer.pas(242,3) Hint: Local const "mci_Back" is not used
Compiling .\sebran\Delphi4\FILEREAD.PAS
D:\Temp\sebran\Delphi4\FILEREAD.PAS(175,17) Error: Element zero of an ansi/wide- or longstring can't be accessed, use (set)length instead
D:\Temp\sebran\Delphi4\FILEREAD.PAS(226,52) Hint: Local variable "TempBufSize" does not seem to be initialized
D:\Temp\sebran\Delphi4\FILEREAD.PAS(249) Fatal: There were 1 errors compiling module, stopping



Legolas

  • Full Member
  • ***
  • Posts: 117
    • http://itaprogaming.free.fr
Re: convert Sebran delphi(4) code to lazarus
« Reply #66 on: February 13, 2009, 04:29:14 pm »
The error message is very clear:
Quote
D:\Temp\sebran\Delphi4\FILEREAD.PAS(175,17) Error: Element zero of an ansi/wide- or longstring can't be accessed, use (set)length instead

Looking at line 175 of FILEREAD.PAS:

Code: [Select]
  { Store the string length. }
  {$IFDEF VER90}
  SetLength(ResultString, StringLength);
  {$ELSE}
  ResultString[0] := Chr(StringLength);
  {$ENDIF}

You can remove all that stuff and let in place only:

Code: [Select]
SetLength(ResultString, StringLength);

or you could define VER90 somewhere before that IFDEFs:

Code: [Select]
{$DEFINE VER90}

von_ks

  • Jr. Member
  • **
  • Posts: 57
Re: convert Sebran delphi(4) code to lazarus
« Reply #67 on: February 13, 2009, 04:59:59 pm »



Fileread is now also compiled



Hint: Start of reading config file D:\lazarus\fpc\2.2.2\bin\i386-win32\fpc.cfg
Hint: End of reading config file D:\lazarus\fpc\2.2.2\bin\i386-win32\fpc.cfg
Free Pascal Compiler version 2.2.2 [2008/10/05] for i386
Copyright (c) 1993-2008 by Florian Klaempfl
Target OS: Win32 for i386
Compiling package01.pas
Compiling D:\delphi\consts.pas
Writing Resource String Table file: consts.rst
Compiling MPlayer.pas
D:\Temp\MPlayer.pas(101,15) Warning: An inherited method is hidden by "TMediaPlayer.SetVisible(TButtonSet)"
D:\Temp\MPlayer.pas(283,52) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(434,42) Hint: Parameter "Color" not used
D:\Temp\MPlayer.pas(104,33) Hint: Parameter "YPos" not used
D:\Temp\MPlayer.pas(123,23) Hint: Parameter "Button" not used
D:\Temp\MPlayer.pas(124,27) Hint: Parameter "Button" not used
D:\Temp\MPlayer.pas(111,31) Hint: Parameter "Message" not used
D:\Temp\MPlayer.pas(113,30) Hint: Parameter "Message" not used
D:\Temp\MPlayer.pas(115,31) Hint: Parameter "Message" not used
D:\Temp\MPlayer.pas(149,38) Hint: Parameter "Shift" not used
D:\Temp\MPlayer.pas(859,49) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(909,60) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(954,57) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(989,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1011,57) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1041,58) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1061,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1121,57) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1179,57) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1207,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1251,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1278,60) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1299,60) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1325,57) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1335,47) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1346,49) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1357,49) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1384,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1428,58) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1442,61) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1476,61) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1498,58) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1512,60) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1529,53) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1534,53) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1539,53) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1544,53) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1549,53) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1558,58) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1571,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1582,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1593,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1603,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1613,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1624,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1705,36) Hint: Converting the operands to "Int64" before doing the add could prevent overflow errors.
D:\Temp\MPlayer.pas(1705,36) Hint: Converting the operands to "Int64" before doing the multiply could prevent overflow errors.
D:\Temp\MPlayer.pas(1706,18) Hint: Converting the operands to "Int64" before doing the multiply could prevent overflow errors.
D:\Temp\MPlayer.pas(242,3) Hint: Local const "mci_Back" is not used
Compiling .\sebran\Delphi4\FILEREAD.PAS
D:\Temp\sebran\Delphi4\FILEREAD.PAS(161,3) Note: Local variable "b" not used
D:\Temp\sebran\Delphi4\FILEREAD.PAS(161,6) Note: Local variable "b2" not used
D:\Temp\sebran\Delphi4\FILEREAD.PAS(163,3) Note: Local variable "code" not used
D:\Temp\sebran\Delphi4\FILEREAD.PAS(226,52) Hint: Local variable "TempBufSize" does not seem to be initialized
D:\Temp\sebran\Delphi4\FILEREAD.PAS(237,5) Note: Local variable "i" not used
D:\Temp\sebran\Delphi4\FILEREAD.PAS(238,5) Note: Local variable "NyStr" not used
Compiling .\sebran\Delphi4\GENERELL.PAS
Compiling .\sebran\Delphi4\MESSAGE.PAS
MESSAGE.PAS(41,30) Hint: Parameter "Sender" not used
MESSAGE.PAS(42,30) Hint: Parameter "Sender" not used
D:\Temp\sebran\Delphi4\MESSAGE.PAS(32,20) Hint: Unit "windows" not used in Message
D:\Temp\sebran\Delphi4\MESSAGE.PAS(32,30) Hint: Unit "messages" not used in Message
Compiling resource .\sebran\Delphi4\MESSAGE.DFM
windres: can not determine type of file `.\sebran\Delphi4\MESSAGE.DFM'; use the -J option
MESSAGE.PAS(76,1) Error: Error while linking
Hint: Start of reading config file D:\lazarus\fpc\2.2.2\bin\i386-win32\fpc.cfg
Hint: End of reading config file D:\lazarus\fpc\2.2.2\bin\i386-win32\fpc.cfg
Free Pascal Compiler version 2.2.2 [2008/10/05] for i386
Copyright (c) 1993-2008 by Florian Klaempfl
Target OS: Win32 for i386
Compiling package01.pas
Compiling D:\delphi\consts.pas
Writing Resource String Table file: consts.rst
Compiling MPlayer.pas
MPlayer.pas(101,15) Warning: An inherited method is hidden by "TMediaPlayer.SetVisible(TButtonSet)"
MPlayer.pas(283,52) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(434,42) Hint: Parameter "Color" not used
MPlayer.pas(104,33) Hint: Parameter "YPos" not used
MPlayer.pas(123,23) Hint: Parameter "Button" not used
MPlayer.pas(124,27) Hint: Parameter "Button" not used
MPlayer.pas(111,31) Hint: Parameter "Message" not used
MPlayer.pas(113,30) Hint: Parameter "Message" not used
MPlayer.pas(115,31) Hint: Parameter "Message" not used
MPlayer.pas(149,38) Hint: Parameter "Shift" not used
MPlayer.pas(859,49) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(909,60) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(954,57) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(989,59) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1011,57) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1041,58) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1061,59) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1121,57) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1179,57) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1207,59) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1251,59) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1278,60) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1299,60) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1325,57) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1335,47) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1346,49) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1357,49) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1384,59) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1428,58) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1442,61) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1476,61) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1498,58) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1512,60) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1529,53) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1534,53) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1539,53) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1544,53) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1549,53) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1558,58) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1571,59) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1582,59) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1593,59) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1603,59) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1613,59) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1624,59) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1705,36) Hint: Converting the operands to "Int64" before doing the add could prevent overflow errors.
MPlayer.pas(1705,36) Hint: Converting the operands to "Int64" before doing the multiply could prevent overflow errors.
MPlayer.pas(1706,18) Hint: Converting the operands to "Int64" before doing the multiply could prevent overflow errors.
MPlayer.pas(242,3) Hint: Local const "mci_Back" is not used
Compiling .\sebran\Delphi4\FILEREAD.PAS
FILEREAD.PAS(161,3) Note: Local variable "b" not used
FILEREAD.PAS(161,6) Note: Local variable "b2" not used
FILEREAD.PAS(163,3) Note: Local variable "code" not used
FILEREAD.PAS(226,52) Hint: Local variable "TempBufSize" does not seem to be initialized
FILEREAD.PAS(237,5) Note: Local variable "i" not used
FILEREAD.PAS(238,5) Note: Local variable "NyStr" not used
Compiling .\sebran\Delphi4\GENERELL.PAS
Compiling .\sebran\Delphi4\MESSAGE.PAS
MESSAGE.PAS(41,30) Hint: Parameter "Sender" not used
MESSAGE.PAS(42,30) Hint: Parameter "Sender" not used
MESSAGE.PAS(32,20) Hint: Unit "windows" not used in Message
MESSAGE.PAS(32,30) Hint: Unit "messages" not used in Message
Compiling resource .\sebran\Delphi4\MESSAGE.DFM
D:\lazarus\fpc\2.2.2\bin\i386-win32\windres.exe: can not determine type of file `.\sebran\Delphi4\MESSAGE.DFM'; use the -J option
D:\Temp\sebran\Delphi4\MESSAGE.PAS(76,1) Error: Error while linking
D:\Temp\sebran\Delphi4\MESSAGE.PAS(76,1) Fatal: There were 1 errors compiling module, stopping




theo

  • Global Moderator
  • Hero Member
  • *****
  • Posts: 1891

von_ks

  • Jr. Member
  • **
  • Posts: 57
Re: convert Sebran delphi(4) code to lazarus
« Reply #69 on: February 16, 2009, 10:03:43 am »
Hi

I have replaced all dfm files by the lfm files in the package and then tried to compile it.

I get some errors. That is in the attachment.

and compiler deliver this messages.

Hint: Start of reading config file D:\lazarus\fpc\2.2.2\bin\i386-win32\fpc.cfg
Hint: End of reading config file D:\lazarus\fpc\2.2.2\bin\i386-win32\fpc.cfg
Free Pascal Compiler version 2.2.2 [2008/10/05] for i386
Copyright (c) 1993-2008 by Florian Klaempfl
Target OS: Win32 for i386
Compiling package01.pas
Compiling D:\delphi\consts.pas
Writing Resource String Table file: consts.rst
Compiling MPlayer.pas
D:\Temp\MPlayer.pas(101,15) Warning: An inherited method is hidden by "TMediaPlayer.SetVisible(TButtonSet)"
D:\Temp\MPlayer.pas(283,52) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(434,42) Hint: Parameter "Color" not used
D:\Temp\MPlayer.pas(104,33) Hint: Parameter "YPos" not used
D:\Temp\MPlayer.pas(123,23) Hint: Parameter "Button" not used
D:\Temp\MPlayer.pas(124,27) Hint: Parameter "Button" not used
D:\Temp\MPlayer.pas(111,31) Hint: Parameter "Message" not used
D:\Temp\MPlayer.pas(113,30) Hint: Parameter "Message" not used
D:\Temp\MPlayer.pas(115,31) Hint: Parameter "Message" not used
D:\Temp\MPlayer.pas(149,38) Hint: Parameter "Shift" not used
D:\Temp\MPlayer.pas(859,49) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(909,60) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(954,57) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(989,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1011,57) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1041,58) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1061,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1121,57) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1179,57) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1207,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1251,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1278,60) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1299,60) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1325,57) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1335,47) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1346,49) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1357,49) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1384,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1428,58) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1442,61) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1476,61) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1498,58) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1512,60) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1529,53) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1534,53) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1539,53) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1544,53) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1549,53) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1558,58) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1571,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1582,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1593,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1603,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1613,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1624,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1705,36) Hint: Converting the operands to "Int64" before doing the add could prevent overflow errors.
D:\Temp\MPlayer.pas(1705,36) Hint: Converting the operands to "Int64" before doing the multiply could prevent overflow errors.
D:\Temp\MPlayer.pas(1706,18) Hint: Converting the operands to "Int64" before doing the multiply could prevent overflow errors.
D:\Temp\MPlayer.pas(242,3) Hint: Local const "mci_Back" is not used
Compiling .\sebran\Delphi4\FILEREAD.PAS
D:\Temp\sebran\Delphi4\FILEREAD.PAS(161,3) Note: Local variable "b" not used
D:\Temp\sebran\Delphi4\FILEREAD.PAS(161,6) Note: Local variable "b2" not used
D:\Temp\sebran\Delphi4\FILEREAD.PAS(163,3) Note: Local variable "code" not used
D:\Temp\sebran\Delphi4\FILEREAD.PAS(226,52) Hint: Local variable "TempBufSize" does not seem to be initialized
D:\Temp\sebran\Delphi4\FILEREAD.PAS(237,5) Note: Local variable "i" not used
D:\Temp\sebran\Delphi4\FILEREAD.PAS(238,5) Note: Local variable "NyStr" not used
Compiling .\sebran\Delphi4\GENERELL.PAS
Compiling .\sebran\Delphi4\MESSAGE.PAS
MESSAGE.PAS(41,30) Hint: Parameter "Sender" not used
MESSAGE.PAS(42,30) Hint: Parameter "Sender" not used
D:\Temp\sebran\Delphi4\MESSAGE.PAS(32,20) Hint: Unit "windows" not used in Message
D:\Temp\sebran\Delphi4\MESSAGE.PAS(32,30) Hint: Unit "messages" not used in Message
Compiling resource .\sebran\Delphi4\MESSAGE.DFM
windres: can not determine type of file `.\sebran\Delphi4\MESSAGE.DFM'; use the -J option
MESSAGE.PAS(76,1) Error: Error while linking
Hint: Start of reading config file D:\lazarus\fpc\2.2.2\bin\i386-win32\fpc.cfg
Hint: End of reading config file D:\lazarus\fpc\2.2.2\bin\i386-win32\fpc.cfg
Free Pascal Compiler version 2.2.2 [2008/10/05] for i386
Copyright (c) 1993-2008 by Florian Klaempfl
Target OS: Win32 for i386
Compiling package01.pas
Compiling D:\delphi\consts.pas
Writing Resource String Table file: consts.rst
Compiling MPlayer.pas
MPlayer.pas(101,15) Warning: An inherited method is hidden by "TMediaPlayer.SetVisible(TButtonSet)"
MPlayer.pas(283,52) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(434,42) Hint: Parameter "Color" not used
MPlayer.pas(104,33) Hint: Parameter "YPos" not used
MPlayer.pas(123,23) Hint: Parameter "Button" not used
MPlayer.pas(124,27) Hint: Parameter "Button" not used
MPlayer.pas(111,31) Hint: Parameter "Message" not used
MPlayer.pas(113,30) Hint: Parameter "Message" not used
MPlayer.pas(115,31) Hint: Parameter "Message" not used
MPlayer.pas(149,38) Hint: Parameter "Shift" not used
MPlayer.pas(859,49) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(909,60) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(954,57) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(989,59) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1011,57) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1041,58) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1061,59) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1121,57) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1179,57) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1207,59) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1251,59) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1278,60) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1299,60) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1325,57) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1335,47) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1346,49) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1357,49) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1384,59) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1428,58) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1442,61) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1476,61) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1498,58) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1512,60) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1529,53) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1534,53) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1539,53) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1544,53) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1549,53) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1558,58) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1571,59) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1582,59) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1593,59) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1603,59) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1613,59) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1624,59) Hint: Conversion between ordinals and pointers is not portable
MPlayer.pas(1705,36) Hint: Converting the operands to "Int64" before doing the add could prevent overflow errors.
MPlayer.pas(1705,36) Hint: Converting the operands to "Int64" before doing the multiply could prevent overflow errors.
MPlayer.pas(1706,18) Hint: Converting the operands to "Int64" before doing the multiply could prevent overflow errors.
MPlayer.pas(242,3) Hint: Local const "mci_Back" is not used
Compiling .\sebran\Delphi4\FILEREAD.PAS
FILEREAD.PAS(161,3) Note: Local variable "b" not used
FILEREAD.PAS(161,6) Note: Local variable "b2" not used
FILEREAD.PAS(163,3) Note: Local variable "code" not used
FILEREAD.PAS(226,52) Hint: Local variable "TempBufSize" does not seem to be initialized
FILEREAD.PAS(237,5) Note: Local variable "i" not used
FILEREAD.PAS(238,5) Note: Local variable "NyStr" not used
Compiling .\sebran\Delphi4\GENERELL.PAS
Compiling .\sebran\Delphi4\MESSAGE.PAS
MESSAGE.PAS(41,30) Hint: Parameter "Sender" not used
MESSAGE.PAS(42,30) Hint: Parameter "Sender" not used
MESSAGE.PAS(32,20) Hint: Unit "windows" not used in Message
MESSAGE.PAS(32,30) Hint: Unit "messages" not used in Message
Compiling resource .\sebran\Delphi4\MESSAGE.DFM
D:\lazarus\fpc\2.2.2\bin\i386-win32\windres.exe: can not determine type of file `.\sebran\Delphi4\MESSAGE.DFM'; use the -J option
D:\Temp\sebran\Delphi4\MESSAGE.PAS(76,1) Error: Error while linking
D:\Temp\sebran\Delphi4\MESSAGE.PAS(76,1) Fatal: There were 1 errors compiling module, stopping
MESSAGE.PAS(-1,0) Error: TSourceChangeCache.ReplaceEx ToPos>MainScanner.CleanedLen+1



von_ks

  • Jr. Member
  • **
  • Posts: 57
Re: convert Sebran delphi(4) code to lazarus
« Reply #70 on: February 16, 2009, 10:05:52 pm »

do you have some idea, how can I solve this problem ?
could you help me please ?

arnoldb

  • Jr. Member
  • **
  • Posts: 96
Re: convert Sebran delphi(4) code to lazarus
« Reply #71 on: February 17, 2009, 09:05:24 am »
It looks like some kind of problem on the MESSAGE.DFM form not converted to Lazarus properly yet...

I'd suggest you look at that first.

Not much help - I know, but a starting place at least.

Regards

Arnold

von_ks

  • Jr. Member
  • **
  • Posts: 57
Re: convert Sebran delphi(4) code to lazarus
« Reply #72 on: February 17, 2009, 10:27:37 am »

Hi

I gues that the name (Message) of this file could be the Problem.
and compiler access other routine .

because the compiler deliver this messages.

D:\lazarus\fpc\2.2.2\bin\i386-win32\windres.exe: can not determine type of file `.\sebran\Delphi4\MESSAGE.DFM'; use the -J option
D:\Temp\sebran\Delphi4\MESSAGE.PAS(76,1) Error: Error while linking

am I right ?
should I rename this file ?
what do you think ?



 

Vincent Snijders

  • Administrator
  • Hero Member
  • *
  • Posts: 2661
    • My Lazarus wiki user page
Re: convert Sebran delphi(4) code to lazarus
« Reply #73 on: February 17, 2009, 10:38:23 am »
I think you should read the conversion guide carefully. It is one of the links mentioned to you before: http://forum.lazarus.freepascal.org/index.php/topic,6252.msg29104.html#msg29104
« Last Edit: February 17, 2009, 10:42:15 am by Vincent Snijders »

von_ks

  • Jr. Member
  • **
  • Posts: 57
Re: convert Sebran delphi(4) code to lazarus
« Reply #74 on: February 17, 2009, 11:53:33 am »


Hi

I have done things written in the code conversation guide.

I could come a another step forward.

but waht about this messages ?
I do not know what kind of Error that is.

Hint: Start of reading config file D:\lazarus\fpc\2.2.2\bin\i386-win32\fpc.cfg
Hint: End of reading config file D:\lazarus\fpc\2.2.2\bin\i386-win32\fpc.cfg
Free Pascal Compiler version 2.2.2 [2008/10/05] for i386
Copyright (c) 1993-2008 by Florian Klaempfl
Target OS: Win32 for i386
Compiling package01.pas
Compiling D:\delphi\consts.pas
Writing Resource String Table file: consts.rst
Compiling MPlayer.pas
D:\Temp\MPlayer.pas(101,15) Warning: An inherited method is hidden by "TMediaPlayer.SetVisible(TButtonSet)"
D:\Temp\MPlayer.pas(283,52) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(434,42) Hint: Parameter "Color" not used
D:\Temp\MPlayer.pas(104,33) Hint: Parameter "YPos" not used
D:\Temp\MPlayer.pas(123,23) Hint: Parameter "Button" not used
D:\Temp\MPlayer.pas(124,27) Hint: Parameter "Button" not used
D:\Temp\MPlayer.pas(111,31) Hint: Parameter "Message" not used
D:\Temp\MPlayer.pas(113,30) Hint: Parameter "Message" not used
D:\Temp\MPlayer.pas(115,31) Hint: Parameter "Message" not used
D:\Temp\MPlayer.pas(149,38) Hint: Parameter "Shift" not used
D:\Temp\MPlayer.pas(859,49) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(909,60) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(954,57) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(989,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1011,57) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1041,58) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1061,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1121,57) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1179,57) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1207,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1251,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1278,60) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1299,60) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1325,57) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1335,47) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1346,49) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1357,49) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1384,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1428,58) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1442,61) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1476,61) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1498,58) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1512,60) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1529,53) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1534,53) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1539,53) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1544,53) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1549,53) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1558,58) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1571,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1582,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1593,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1603,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1613,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1624,59) Hint: Conversion between ordinals and pointers is not portable
D:\Temp\MPlayer.pas(1705,36) Hint: Converting the operands to "Int64" before doing the add could prevent overflow errors.
D:\Temp\MPlayer.pas(1705,36) Hint: Converting the operands to "Int64" before doing the multiply could prevent overflow errors.
D:\Temp\MPlayer.pas(1706,18) Hint: Converting the operands to "Int64" before doing the multiply could prevent overflow errors.
D:\Temp\MPlayer.pas(242,3) Hint: Local const "mci_Back" is not used
Compiling .\sebran\Delphi4\FILEREAD.PAS
D:\Temp\sebran\Delphi4\FILEREAD.PAS(161,3) Note: Local variable "b" not used
D:\Temp\sebran\Delphi4\FILEREAD.PAS(161,6) Note: Local variable "b2" not used
D:\Temp\sebran\Delphi4\FILEREAD.PAS(163,3) Note: Local variable "code" not used
D:\Temp\sebran\Delphi4\FILEREAD.PAS(226,52) Hint: Local variable "TempBufSize" does not seem to be initialized
D:\Temp\sebran\Delphi4\FILEREAD.PAS(237,5) Note: Local variable "i" not used
D:\Temp\sebran\Delphi4\FILEREAD.PAS(238,5) Note: Local variable "NyStr" not used
Compiling .\sebran\Delphi4\GENERELL.PAS
Compiling .\sebran\Delphi4\MESSAGE.PAS
MESSAGE.PAS(41,30) Hint: Parameter "Sender" not used
MESSAGE.PAS(42,30) Hint: Parameter "Sender" not used
D:\Temp\sebran\Delphi4\MESSAGE.PAS(32,20) Hint: Unit "windows" not used in Message
D:\Temp\sebran\Delphi4\MESSAGE.PAS(32,30) Hint: Unit "messages" not used in Message
Compiling .\sebran\Delphi4\HMENY.PAS
Compiling .\sebran\Delphi4\HURMAN.PAS
Compiling .\sebran\Delphi4\HMENY.PAS
Compiling .\sebran\Delphi4\HANGMAN.PAS
Compiling .\sebran\Delphi4\HMENY.PAS
Compiling .\sebran\Delphi4\REGN.PAS
Compiling .\sebran\Delphi4\HMENY.PAS
Compiling .\sebran\Delphi4\ABOUT.PAS
Compiling .\sebran\Delphi4\HMENY.PAS
D:\Temp\sebran\Delphi4\HMENY.PAS(203,34) Warning: unreachable code
HMENY.PAS(89,24) Hint: Parameter "Sender" not used
D:\Temp\sebran\Delphi4\HMENY.PAS(262,20) Error: Identifier not found "frmOvMemory"
D:\Temp\sebran\Delphi4\HMENY.PAS(262,35) Error: Identifier not found "TfrmOvMemory"
D:\Temp\sebran\Delphi4\HMENY.PAS(263,19) Error: Identifier not found "frmOvMemory"
D:\Temp\sebran\Delphi4\HMENY.PAS(274,21) Error: Identifier not found "frmOvMemory"
D:\Temp\sebran\Delphi4\HMENY.PAS(274,36) Error: Identifier not found "TfrmOvMemory"
D:\Temp\sebran\Delphi4\HMENY.PAS(275,20) Error: Identifier not found "frmOvMemory"
D:\Temp\sebran\Delphi4\HMENY.PAS(591) Fatal: There were 6 errors compiling module, stopping





 

TinyPortal © 2005-2018