Thema: Delphi Probleme mit Variants

Einzelnen Beitrag anzeigen

ratloser

Registriert seit: 4. Mai 2005
Ort: Linz
36 Beiträge
 
#11

Re: Probleme mit Variants

  Alt 25. Okt 2006, 21:26
Also zu obiger Fehlermeldung:

Stehen bleibt er bei Forms in der letzten nachstehend angezeigten Zeile:

Delphi-Quellcode:
procedure TCustomForm.ReadState(Reader: TReader);
var
  NewTextHeight: Integer;
  Scaled: Boolean;
begin
  DisableAlign;
  try
    FClientWidth := 0;
    FClientHeight := 0;
    FTextHeight := 0;
    Scaled := False;
    FOldCreateOrder := not ModuleIsCpp;
    inherited ReadState(Reader);
    if (FPixelsPerInch <> 0) and (FTextHeight > 0) then
Vielen Dank!

Konrad
  Mit Zitat antworten Zitat