Forum: Object-Pascal / Delphi-Language
Delphi
by Neutral General,
18. Sep 2008
function EnumResTypeProcA(hModule: HINST; lpszType: PChar; lParam: LPARAM): BOOL; stdcall;
begin
Writeln('RESOURCE TYPE: ', ResourceTypes(lpszType));
EnumResourceNamesA(hModule, lpszType, @EnumResNameProcA, 0);
Result := True;
end;
Dann will ich mal sehn wie du da Result := 'RESOURCE TYPE: ' + lpszType; setzt.
Ist dir denn ungefähr bewusst, was welche procedure/funktion macht?...
Forum: Object-Pascal / Delphi-Language
Delphi
by Neutral General,
18. Sep 2008
Och Lars.
Das ist ne Record Deklaration und danach eine globale, vorinitialisierte Variable.
Was für Fehler kommen denn da?
Forum: Object-Pascal / Delphi-Language
Delphi
by Neutral General,
18. Sep 2008
Hi,
Mach es der Übersicht und dem Verständnis wegen so:
interface
type
TResourceName = record
ResType: PChar;
ResTypeName: string;
Forum: Object-Pascal / Delphi-Language
Delphi
by Neutral General,
18. Sep 2008
Hi,
Musst halt die ganzen readlns und writelns rausnehmen... Ersetz sie durch was anderes oder lass sie weg.