Ich versuche gerade die
Unit im Anhang für Lazarus lauffähig zu bekommen. Scheitere aber noch an folgen den fehlern:
Zitat:
units\MpuTools.pas(701,24) Hint: Local variable "Msg" does not seem to be initialized
units\MpuTools.pas(772,30) Hint: Local variable "ft" does not seem to be initialized
units\MpuTools.pas(874,25) Error: Incompatible type for arg no. 1: Got "OPENFILENAME", expected "LPOPENFILENAME"
units\MpuTools.pas(901,25) Error: Incompatible type for arg no. 1: Got "OPENFILENAME", expected "LPOPENFILENAME"
units\MpuTools.pas(925,23) Error: Illegal type conversion: "ShortString" to "^Char"
units\MpuTools.pas(929,41) Error: Incompatible type for arg no. 1: Got "BROWSEINFO", expected "LPBROWSEINFO"
units\MpuTools.pas(983,16) Hint: Local variable "bi" does not seem to be initialized
units\MpuTools.pas(988,25) Warning: Local variable "ca" does not seem to be initialized
units\MpuTools.pas(989,20) Error: Illegal type conversion: "ShortString" to "^Char"
units\MpuTools.pas(992,41) Error: Incompatible type for arg no. 1: Got "BROWSEINFO", expected "LPBROWSEINFO"
units\MpuTools.pas(1030,16) Hint: Local variable "bi" does not seem to be initialized
units\MpuTools.pas(1039,41) Error: Incompatible type for arg no. 1: Got "BROWSEINFO", expected "LPBROWSEINFO"
units\MpuTools.pas(1209,50) Error: Call by var for arg no. 2 has to match exactly: Got "WIN32_FIND_DATAW" expected "WIN32_FIND_DATA"
units\MpuTools.pas(1212,14) Warning: Local variable "wfd" does not seem to be initialized
units\MpuTools.pas(1212,75) Hint: Converting the operands to "Int64" before doing the add could prevent overflow errors.
units\MpuTools.pas(1222,32) Error: Illegal type conversion: "ShortString" to "^Char"
units\MpuTools.pas(1242,32) Error: Illegal type conversion: "ShortString" to "^Char"
units\MpuTools.pas(1261,66) Hint: Function result variable does not seem to be initialized
units\MpuTools.pas(1271,67) Hint: Function result variable does not seem to be initialized
units\MpuTools.pas(1305,22) Hint: Local variable "SizeWritten" does not seem to be initialized
units\MpuTools.pas(1320,41) Error: Identifier not found "TNonClientMetricsW"
units\MpuTools.pas(1320,41) Error: Error in type definition
units\MpuTools.pas(1322,13) Error: Illegal qualifier
units\MpuTools.pas(1322,48) Error: Identifier not found "TNonClientMetricsW"
units\MpuTools.pas(1323,74) Error: Identifier not found "TNonClientMetricsW"
units\MpuTools.pas(1366,28) Error: Illegal type conversion: "ShortString" to "^Char"
units\MpuTools.pas(1373,16) Hint: Local variable "BytesRead" does not seem to be initialized
units\MpuTools.pas(1372,47) Hint: Local variable "ImageDosHeader" does not seem to be initialized
units\MpuTools.pas(1384,48) Hint: Local variable "ImageNtHeaders" does not seem to be initialized
units\MpuTools.pas(1419,73) Warning: Mixing signed expressions and longwords gives a 64bit result
units\MpuTools.pas(1419,73) Hint: Converting the operands to "Int64" before doing the multiply could prevent overflow errors.
units\MpuTools.pas(1433,42) Error: Expression type must be class or record type
units\MpuTools.pas(1434,34) Error: Identifier not found "VirtualAddress"
units\MpuTools.pas(1435,33) Error: Identifier not found "VirtualAddress"
units\MpuTools.pas(1435,49) Error: Identifier not found "SizeOfRawData"
units\MpuTools.pas(1437,47) Error: Identifier not found "PointerToRawData"
units\MpuTools.pas(1437,65) Error: Identifier not found "VirtualAddress"
units\MpuTools.pas(1451,51) Hint: Local variable "ResDirTable" does not seem to be initialized
units\MpuTools.pas(1459,56) Hint: Local variable "FileTime" does not seem to be initialized
units\MpuTools.pas(1533,47) Hint: Local variable "Rect" does not seem to be initialized
units\MpuTools.pas(1536,8) Error: Illegal qualifier
units\MpuTools.pas(1536,8) Hint: may be pointer dereference is missing
units\MpuTools.pas(1536,8) Error: Illegal expression
units\MpuTools.pas(1536,8) Fatal: Syntax error, ";" expected but "identifier HWND" found
Wenn mir da jemand helfen könnte. Und es sollte wenn möglich alles
Unicode sein.
Klasse wäre natürlich auch, wenn man sie auch unter Delphi zum Laufen bekäme.