Graphics32 GR32 unter Delphi XE?

[generic]

Zitat von termodox:

Mein Gott, was soll man da ändern? Ich verstehe nichts =/
was ist das "@@ -1188,7 +1188,7 @@"??

Du Nix, du nutzt die Patch.exe - die kann mit dem Diff-Ausgaben was anfangen.

http://gnuwin32.sourceforge.net/packages/diffutils.htm

[termodox]

Wow, ok, ich hab es runtergeladen. was muss ich jetzt in Dos schreiben damit das Programm die Änderungen macht?

Muss ich eine text Datei erstellen mit dem Code hier?
DANKE! FROHES NEUES!

[generic]

Code:

Usage: patch [OPTION]... [ORIGFILE [PATCHFILE]]

Input options:

  -p NUM  --strip=NUM  Strip NUM leading components from file names.
  -F LINES  --fuzz LINES  Set the fuzz factor to LINES for inexact matching.
  -l  --ignore-whitespace  Ignore white space changes between patch and input.

  -c  --context  Interpret the patch as a context difference.
  -e  --ed  Interpret the patch as an ed script.
  -n  --normal  Interpret the patch as a normal difference.
  -u  --unified  Interpret the patch as a unified difference.

  -N  --forward  Ignore patches that appear to be reversed or already applied.
  -R  --reverse  Assume patches were created with old and new files swapped.

  -i PATCHFILE  --input=PATCHFILE  Read patch from PATCHFILE instead of stdin.

Output options:

  -o FILE  --output=FILE  Output patched files to FILE.
  -r FILE  --reject-file=FILE  Output rejects to FILE.

  -D NAME  --ifdef=NAME  Make merged if-then-else output using NAME.
  -E  --remove-empty-files  Remove output files that are empty after patching.

  -Z  --set-utc  Set times of patched files, assuming diff uses UTC (GMT).
  -T  --set-time  Likewise, assuming local time.

  --quoting-style=WORD   output file names using quoting style WORD.
    Valid WORDs are: literal, shell, shell-always, c, escape.
    Default is taken from QUOTING_STYLE env variable, or 'shell' if unset.

Backup and version control options:

  -b  --backup  Back up the original contents of each file.
  --backup-if-mismatch  Back up if the patch does not match exactly.
  --no-backup-if-mismatch  Back up mismatches only if otherwise requested.

  -V STYLE  --version-control=STYLE  Use STYLE version control.
        STYLE is either 'simple', 'numbered', or 'existing'.
  -B PREFIX  --prefix=PREFIX  Prepend PREFIX to backup file names.
  -Y PREFIX  --basename-prefix=PREFIX  Prepend PREFIX to backup file basenames.
  -z SUFFIX  --suffix=SUFFIX  Append SUFFIX to backup file names.

  -g NUM  --get=NUM  Get files from RCS etc. if positive; ask if negative.

Miscellaneous options:

  -t  --batch  Ask no questions; skip bad-Prereq patches; assume reversed.
  -f  --force  Like -t, but ignore bad-Prereq patches, and assume unreversed.
  -s  --quiet  --silent  Work silently unless an error occurs.
  --verbose  Output extra information about the work being done.
  --dry-run  Do not actually change any files; just print what would happen.
  --posix  Conform to the POSIX standard.

  -d DIR  --directory=DIR  Change the working directory to DIR first.
  --binary  Read and write data in binary mode (no effect on this platform).

  -v  --version  Output version info.
  --help  Output this help.

Report bugs to <[e-mail]>.

[generic]

Also du schneidest dir erst einmal die Diff Dateien aus dem Post oben zurecht.

Ein Patch-File beginnt *NACH* dem Teil:

Code:

================================================== =================
RCS file: /usr/cvsroot/medicalobjects/components/graphics32/GR32_Transforms.pas,v
retrieving revision 1.1.1.2
diff -u -r1.1.1.2 GR32_Transforms.pas

Also ab und inkl. der ---
Aus der letzten Zeile kannst du den Dateinamen entnehmen.
Beispiel hier GR32_Transforms.pas -> GR32_Transforms.pas.diff

Also beginnt der Inhalt von GR32_Transforms.pas.diff mit

Code:

--- GR32_Transforms.pas 1 Dec 2010 11:29:10 -0000 1.1.1.2
+++ GR32_Transforms.pas 1 Dec 2010 22:19:28 -0000
@@ -1024,14 +1024,14 @@
procedure TTwirlTransformation.ReverseTransformFloat(DstX, DstY: TFloat;

[...]

Du muss im Verzeichnis der originalen GR32_Transforms.pas (Version 1.1.1.2) stehen.
Nun in der Shell einfach folgendes Aufrufen:

Code:

patch GR32_Transforms.pas GR32_Transforms.pas.diff

[DevidEspenschied]

Hallo,

nachdem ich hier alles durchgearbeitet habe und nachwievor versuche, Graphics32 unter Delphi XE zum Laufen zu bringen, stellt sich mir folgende Frage:

Wenn ich die letzten Sourcen aus der Delphi-Versionskontrolle öffne und alles von
https://graphics32.svn.sourceforge.n...2/trunk/Source herunterlade,
wieso muss ich dann immer noch einzelne Dateien patchen, um alles unter Delphi XE kompilieren zu können?

Schließlich beinhaltet der Download auch die Packages für Delphi XE (GR32_DSGN_RSXE1) und hier scheint trotz dem Patchen nicht alles zu laufen.

Kann mal jemand, der Graphics32 unter Delphi XP im Einsatz hat, das Graphics32-Verzeichnis hier hochladen? Das wäre wirklich mal 'ne Hilfe.

Danke und Gruß

[DevidEspenschied]

So, ich habe jetzt einen Patch gefunden, der aus dem letzten Graphics32 1.9.0 eine Delphi XE kompatible Version macht:

http://sourceforge.net/tracker/index...85&atid=663800

Das hat bei mir funktioniert.

[darknes]

Allso bei mir hat der patch nicht funktioniert da hier noch drei fehler auftretten:
Swap(Pointer(Node1.Next), Pointer(Node2.Next)); Und zwar dieser error:es gibt keine überladene version von swap die man mit diesen argumenten aufrufen kann.