himXML (gesprochen himix ML)

[GPRSNerd]

Hallo himitsu,

Delphi XE schmeisst (neben anderen) ein paar Warnungen beim Compilen von himxml.pas aus in Zeilen wie:
Integer(@X.Time)

[DCC Warnung] himXML.pas(3157): W1000 Symbol 'Time' ist veraltet
[DCC Warnung] himXML.pas(3312): W1000 Symbol 'Time' ist veraltet

Hast du ne Ahnung wie man das fixen kann? Es scheint generell mit TSearchRec.Time und FileAge u.ä. zu tun zu haben...
Habe im inet nichts genaueres dazu gefunden.

Gruß,
Stefan

[himitsu]

Diese Veraltet-Meldungen kann man notfalls erstmal ignorieren.

Das Bedeutet nur, daß es eventuell neuere/andere Funktionen/Aufrufe gibt und daß die entsprechende veraltete Funktion vermutlich demnächst aus Delphi entfernt wird.

[RWarnecke]

Hallo himitsu,

ich arbeite gerade mit himXML unter Delphi 2010. Dabei hat er ein Problem mit dem Type TTypeKind. In Deiner himXML in Zeile 6764 sind nur 19 Typen deklariert. Unter Delphi 2010 sind aber für TTypeKind aber 22 Typen deklariert.
Ich habe jetzt einfach mal die Zeile 6764 erweitert. Das ganze sieht dann so aus :

Delphi-Quellcode:

        Const cTypeKind: Array[TTypeKind] of AnsiString = ('Unknown', 'Integer', 'Char',
            'Enumeration', 'Float', 'String', 'Set', 'Class', 'Method', 'WChar',
            'LString', 'WString', 'Variant', 'Array', 'Record', 'Interface', 'Int64',
            'DynArray' {$IF Declared(UnicodeString)}, 'UString', 'ClassRef', 'Pointer', 'Procedure' {$IFEND} );

Funktionieren tut es erstmal.

Edit: Ich habe gerade gesehen, dass in der Version 0.99d das ganze behoben ist. Dann werde ich diese nehmen.

[RWarnecke]

Hallo himitsu,

wieviel Assembler hast Du denn in Deinem himXML ? Eine Funktion habe ich schon gefunden, die Funktion Class Function TXHelper.Pos(Const Sub, S: TWideString): Integer; . Änderst Du da noch etwas in Richtung 64Bit für XE2 ?

[himitsu]

Ich glaub al zuviel Assembler war nicht drin

"heimlich" geändert wird schon seit XE so Einiges daran ... aber die Zeit -.-°
(Hab zwar ein Beta insalliert, welche bald wieder ausläuft, aber noch nicht viel damit gemacht
und wann/ob ich mir XE2 kaufe
und ich glaub geldlich/zeitlich werde ich die 10% DT-Rabatt nicht mehr nutzen können )

[RWarnecke]

Da ich die Datei benötige, kann ich statt dem Assembler Pascal Code einfügen, der mit die Position des Suchstrings vom übergebenen String zurückliefert ? Der Assembler Code macht doch nichts anderes oder ?

[himitsu]

Jupp.

Du könntest (vermutlich) auch das normale Pos verwenden.

Diese Funkion war IMHO nur wegen älteren Delphis enthalten. (glaub ich)

Ich hoffe nur keiner heult, wenn ich die nächste Version nur für D2010/XE und Neuer rausbring.
(eigentlich ab D2009, aber für Compilerfehler und andere delphieigene Bugs, mach ich mir, auf Biegen und Brechen, keinen Buckel mehr krum)