Resource-File in Tokyo mit TEXT

[HJay]

Zitat von Bernhard Geyer:

GetResourceAsPointer ist keine Standard-Delphi-Funktion die mitgeliefert wird. Wie schaut also GetResourceAsPointer aus?

Delphi-Quellcode:

function GetResourceAsPointer(ResName: pchar; ResType: pchar; out Size: longword): pointer;
    var InfoBlock: HRSRC;
        GlobalMemoryBlock: HGLOBAL;
  begin
    InfoBlock         := FindResource(hInstance, resname, restype); if InfoBlock = 0         then raise Exception.Create(SysErrorMessage(GetLastError));
    size              := SizeofResource(hInstance, InfoBlock);      if size = 0              then raise Exception.Create(SysErrorMessage(GetLastError));
    GlobalMemoryBlock := LoadResource(hInstance, InfoBlock);        if GlobalMemoryBlock = 0 then raise Exception.Create(SysErrorMessage(GetLastError));
    Result            := LockResource(GlobalMemoryBlock);           if Result = nil          then raise Exception.Create(SysErrorMessage(GetLastError));
  end;

[HJay]

Was für ein Mist. Jetzt habe ich, um weiterarbeiten zu können, die $R-Anweisung entfernt -- und trotzdem kommt die obige Fehlermeldung, dass er die CODEKEY.RC nicht finden kann.

Wo in aller Welt merkt sich denn Delphi, dass man mal so eine Option eingebaut hatte? ich habe die dazugehörige CODEKEY.RES-Datei natürlich gelöscht.

Grrrr.....

PS
ich kann jetzt erst mal nach Löschen der *.dproj... Dateien wieder weiterarbeiten. Aber das ist doch zum Verzweifeln. In XE7 war alles so einfach und geradlinig.

[HJay]

Zitat von Uwe Raabe:

Also folgendes funktioniert bei mir unter Tokyo:
- unter Projekt - Ressourcen und Bilder wähle ich die passende Textdatei aus, vergebe den Namen "codekey" und schreibe bei Ressourcentyp "TEXT" hinein.

Danke, das hat jetzt nach erneutem Löschen der dproj die Lösung gebracht. Darauf, dass man TEXT eingeben kann, obwohl es nicht zur Auswahl angeboten wird, war ich nicht gekommen.

Delphi hat dann automatisch eine passende *.dres Datei erzeugt und mit $R eingebunden. Jetzt weiß ich auch, wozu dres gut ist...

Zitat:

- im Programm kann ich den Inhalt der Ressource mit folgendem Code auslesen:

Werde ich mal ausprobieren. Meine alte Prozedur kann auch drauf zugreifen.

[HJay]

Zitat von Uwe Raabe:

im Programm kann ich den Inhalt der Ressource mit folgendem Code auslesen:

Ja, danke, hat geklappt. Der Code ist sehr ähnlich zu dem in Haentschman's Beispielprojekt. Beides funktioniert und die Routine ist übersichtlicher als meine alte Fassung.

Danke euch alle!



PS
Dennoch, diese $R -Anweisung zum Konvertieren von RC zu RES manuell einzubinden, hat Delphi völlig verwirrt und ohne Löschen aller möglichen Dateien wäre es nicht wieder zum Laufen zu bringen gewesen. Da ist noch der Wurm in Delphi drin.