Forum: Sonstige Fragen zu Delphi
Delphi
by jbg,
24. Mai 2009
Es gibt hier keinen.
In CreateRecips gibt es einen Unterschied. Und zwar ist hier eine Schleife im Spiel. Ein "PAnsiChar(AnsiString(S))" führt dazu, dass der Compiler eine temporäre AnsiString Variable (auf dem Stack) anlegt. Der PAnsiChar zeigt dann auf diesen AnsiString und so tut lpszAddress. Beim nächten Schleifendurchlauf wird diese temporäre Variable erneut benutzt und enthält nun...
Forum: Sonstige Fragen zu Delphi
Delphi
by jbg,
16. Mai 2009
Also folgendes liefert mir unter Delphi 2009 den Wert 2.
procedure TForm1.FormCreate(Sender: TObject);
var
osInfo: TOSVersionInfo;
begin
osInfo.dwOSVersionInfoSize := SizeOf(osInfo);
GetVersionEx( osInfo );
ShowMessage(IntToStr(osInfo.dwPlatformId));
end;