AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Sprachen und Entwicklungsumgebungen FreePascal Delphi Unit Lazarus lauffähig machen
Thema durchsuchen
Ansicht
Themen-Optionen

Delphi Unit Lazarus lauffähig machen

Ein Thema von Luckie · begonnen am 20. Dez 2009 · letzter Beitrag vom 20. Dez 2009
 
Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#1

Delphi Unit Lazarus lauffähig machen

  Alt 20. Dez 2009, 06:46
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.
Angehängte Dateien
Dateityp: pas mputools_124.pas (62,3 KB, 12x aufgerufen)
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 03:47 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz