Forum: Win32/Win64 API (native code)
by Luckie,
1. Dez 2010
Würde ich machen, aber ich habe zur Zeit nur ein kleines Netbook zur Verfügung, welches ich mir mit meinem Vater teile. Und eine VM würde es wohl in die Knie zwingen.
Forum: Win32/Win64 API (native code)
by Luckie,
1. Dez 2010
Sehr schön. Danke fürs Testen. Hätte jemand noch den Server 2008 zum Testen zur Verfügung? Weil damit habe ich im Kompatibilitätsmodus ja dieses Vista Problem. Eventuell ist es ja nur ein Problem mit dem Kompatibilitätsmodus und es funktioniert in Wirklichkeit.
Forum: Win32/Win64 API (native code)
by Luckie,
30. Nov 2010
So, hier ist die aktuelle Version.
Forum: Win32/Win64 API (native code)
by Luckie,
30. Nov 2010
Das ist jetzt behoben und steht am Anfang.
@toms: Das mit dem 32/64-Bit scheint jetzt gelöst zu sein. Ich habe nur noch das Vista/Srever 2008 Problem.
Forum: Win32/Win64 API (native code)
by Luckie,
30. Nov 2010
OK, aber das habe ich eigentlich hier berücksichtigt:
if (osvi.dwMajorVersion = 6) then
begin
if (osvi.dwMinorVersion = 0) then
begin
if (osvi.wProductType = VER_NT_WORKSTATION) then
Result := 'Windows Vista'
else
Result := 'Windows Server 2008';
end;
Forum: Win32/Win64 API (native code)
by Luckie,
30. Nov 2010
Das müsste dieser Stelle im original Code entsprechen:
// Call GetNativeSystemInfo if supported or GetSystemInfo otherwise.
pGNSI = (PGNSI) GetProcAddress(
GetModuleHandle(TEXT("kernel32.dll")),
"GetNativeSystemInfo");
if(NULL != pGNSI)
pGNSI(&si);
else GetSystemInfo(&si);
Da war ich etwas unsicher, wie ich das übersetzen sollte und habe es weggelassen. Muss...
Forum: Win32/Win64 API (native code)
by Luckie,
30. Nov 2010
In wie fern sollte das mein Problem lösen?
Forum: Win32/Win64 API (native code)
by Luckie,
30. Nov 2010
Wenn du zeit hast, könntest du das mal bitte debuggen?
Forum: Win32/Win64 API (native code)
by Luckie,
30. Nov 2010
OK, aber warum bekomme ich unter Sever 2008 Vista angezeigt, wenn ich es unter Windows 7 im Kompatibilitätsmodus starte?
Forum: Win32/Win64 API (native code)
by Luckie,
30. Nov 2010
Schön, dann sind ja keine großen Änderungen erforderlich.
Forum: Win32/Win64 API (native code)
by Luckie,
30. Nov 2010
OK. Korrigiert. Bitte noch mal testen. Eventuell behebt das schon einige Fehler.
Forum: Win32/Win64 API (native code)
by Luckie,
30. Nov 2010
Noch mal zu dem C Code:
if Wert1 & Wert dann
Wie übersetzt man das in Delphi? Eventuell habe ich das falsch Übersetzt.
Forum: Win32/Win64 API (native code)
by Luckie,
30. Nov 2010
Hm, da muss ich mal gucken, ob ich da was falsch abgeschrieben habe.
Forum: Win32/Win64 API (native code)
by Luckie,
30. Nov 2010
Wie gesagt, das hilft mir im Moment nicht all zu viel. Deswegen habe ich euch ja gebeten mal im Quellcode zu gucken, wo es schief läuft.
Forum: Win32/Win64 API (native code)
by Luckie,
30. Nov 2010
Ich weiß, dass es davon genug Versionen gibt, also warum nicht noch eine? ;)
Könntet ihr es bitte mal testen? Ich habe es unter Windows 7 unter den verschiedenen Kompatibilitätsmodi ausprobiert. Klappt alles, bis auf Server 2008, da bekomme ich immer Vista raus.
Projekt im Anhang.
