TStringAlignGrid Andreas Hörstemeier/Delphi2009 oder 2010

[gullatrulla]

Hallo himitsu

Ich habe eigentlich nur Deine Komponente unverändert kompiliert und
dann auf ein Formular gesetzt.

Die Zugriffsverletzung erscheint nicht während des Programmablaufs
sondern gleich innerhalb der IDE beim Doppelklick aus Grid.

Herzliche Grüsse
Roland


Ps. Die OriginalSource von Andreas Hörstemeier's TStringAlignGrid
habe ich als Attachment angehängt.

[NickelM]

Hm....bei mir kommt wegen der ah_tool datei fehler ohne ende LOL...
wegen variablen zeug..ne frage musstest du die auch ändern?

[gullatrulla]

Nein, die Datei ah_tool.pas musste ich nicht verändern.
Vermutlich liegt es an der Datei ah_def.inc bei welcher die
Versions-Checks für die Delphi Versionen gesetzt werden sollen.
Dies habe ich gemacht (für Delphi 2009 und Delphi 2010).

Ich lege als Attachment einmal die Version bei welche ich zur Zeit
versuchen zum laufen zu bringen.

Ich bin jetzt soweit, dass die Komponente fehlerfrei kompiliert.
Auch der Doppelklick innerhalb der IDE funktioniert.
(Mit dem Doppelklick wird der interne Editor der TStringAligngrid geöffnet.)

Wenn ich nun jedoch einen Wert in das Grid tippe und dann auf OK
klicke erhalte ich die Fehlermeldung.

Vielleicht sieht jemand von Euch das Problem.

Herzlichen Dank für Eure Hilfe
Roland

[kurt]

Hallo,
ist das Thema noch aktuell ?
Hat einer in Delphi XE schon Anpassungen genmacht ?

Danke + Gruß Kurti

[himitsu]

Wenn es unter 2009/2010 läuft, dann sollte es auch unter XE laufen.
Die meißten Probleme entstanden bei der Unicodeumstellung in Delphi 2009.

Hast du den Code aus Beitrag #25 mal ausprobiert
und wenn ja, welche Fehlermeldungen/Probleme sind denn aufgetaucht?
(ohne XE kann ich es ja schlecht selber ausprobieren)

[kurt]

Danke für die schnelle Antwort.
... läuft leider eben nich ... Strings aus der dfm werden schon falsch ausgelesen ...denke mit UniCode (2 byte) denn es werden komplett falsche Zeiche angezeigt.
auch xxx.WriteString schreibt 'Unfug' in die dfm. Der Aufruf des Grideditor's schläg auch fehl mit nen RTL-Fehler.
Aus der Fehlermeldung schließe ich (unerfahren) das sicher ein unicode-string in einen ansi-string geschrieben wird.
Soweit ich etwas gelesen hab in 'Neu bei XE' werden wohl Strings doch wieder grundsätzlich anders behandelt.
Bin aber leider zu dumm eine Komponente zur Entwurfszeit zu debuggen.


Gruß Kurti

[kurt]

Hab für mich ne Lösung gefunden.

Code:

procedure TStringAlignGrid.ListToCells(List: TList);
var v: PAnsiString;   // original  v: PString;
    ACol, ARow: longint;
begin
  for ACol:= 0 to ColCount- 1 do
    for ARow:= 0 to RowCount- 1 do begin
      v:= GetItemCell(ACol, ARow, List);

      if v <> NIL then Cells[ACol,ARow]:= v^
                  else Cells[ACol,ARow]:= '';
    end;
end;

Und es schein alles zu gehen. Kann mir da einer erklären (will ja lernen) warum dies zw. D2010 und DXE anders ist?
Grüße Kurti

[NickelM]

So ich hab jetzt mal ein paar dinge verändert.
Bei mir (Delphi 2009) kommen nun keine fehler mehr.
Hab nur die veränderten Dateien angehängt
Was mir nur aufgefallen ist, ist das jetzt beim Start der Anwendung die voreingestellten Strings nur teilweise angezeigt werden.
Ich wollte mal wissen ob das nun auch bei dir kommt.
Wenn ja glaub ich muss ich, damit es besser läuft, die Speicherung der virtuellen Zellen komplett ändern.
Das Prob war das PString und PChar zusammen gemischt waren. Dies funkt natürlich nicht.
PString ist nen Pointer auf nen String und PChar nen Pointer auf die einzelnen Chars, soviel ich weis.
Wenn das mit den Strings auch bei dir kommt, dan muss ich wohl ne eigene Klasse für die machen

Hoffe ich konnte dir immerhin schonmal ein wenig helfen.
Wenns noch weitere Probs auser dies gibt, sag mir mal bescheid, durch was,wann und wo genau das passiert. Dann versuch ich mal das auch herauszufinden.

[himitsu]

Zitat von gullatrulla:

Die Zugriffsverletzung erscheint nicht während des Programmablaufs
sondern gleich innerhalb der IDE beim Doppelklick aus Grid.

Also bis auf ein paar umgestellte Uses-Listen (Controls mußte z.B. weiter hinten eingefügt werden, da sonst noch Definitionen aus anderen Units verwendet wurden, welche verschoben wurden und wo der Compiler dann die Verwendung der "alten" Typen meckert)

Es sind jetzt praktisch alle Warnungen raus (bis auf eine bezüglich dem IN bei Char-Sets).

Ansonsten hab ich eigentlich nichts mehr verändert.
Und bei mir läßt es sich ebenfalls in D2009 ohne Exception einfügen

Zitat von gullatrulla:

Ps. Die OriginalSource von Andreas Hörstemeier's TStringAlignGrid
habe ich als Attachment angehängt.

Die hatte ich mir schon persönlich von diesem geholt, aber es kann bestimmt nicht schaden diese hier mit zu haben ... wer weiß, wann er ganz aufhört und diese von seiner Seite runterlöscht

[NickelM]

So zur Zeit hab ich mal versucht auf eine ganz andere weise die Strings zu machen aber irgendwie macht er es nicht
Ich hab die zweite TList die erstellt wird für die Strings in eine TStringList geändert um das speichern mit den Strings zu vereinfachen.
Alle Funktionen habe ich nun die auf das zugreifen, kopiert und geändert (sozusagen eine 2te Prozedure jeweils gemacht)
Weil mit PChar gehts net als Pointer der Liste zu übergeben, dies führt zu anderen Texten bzw. andere Zeichen. Egal ob man übern Editor ändert oder compiliert und dan starten, steht was völlig anderes drin...

So...zurück zu meinen Versuch. Das mit den Stringlisten funkt schon aber nichts wird im Grid angezeigt .
Bin mit der Suche mehrmals alle Variablen FHintCell und FCell durchgegangen um alle Zuweisungen zuändern.
Wird aber trotzdem nicht angezeigt.
Vllt ist es ja eine Idee wie man es machen kann, vllt bekommst du (gullatrulla) es hin oder auch jemand anderes
Bin mal weiter am suchen