Ergebnis der Suchanfrage

• Forum: Algorithmen, Datenstrukturen und Klassendesign

  AW: Resource-File in Tokyo mit TEXT

    Delphi
    by HJay, 26. Mai 2017
  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...
• Forum: Algorithmen, Datenstrukturen und Klassendesign

  AW: Resource-File in Tokyo mit TEXT

    Delphi
    by HJay, 26. Mai 2017
  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...
  
  
  Werde ich mal ausprobieren. Meine alte Prozedur kann auch drauf zugreifen.
• Forum: Algorithmen, Datenstrukturen und Klassendesign

  AW: Resource-File in Tokyo mit TEXT

    Delphi
    by HJay, 26. Mai 2017
  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...
• Forum: Algorithmen, Datenstrukturen und Klassendesign

  AW: Resource-File in Tokyo mit TEXT

    Delphi
    by HJay, 26. Mai 2017
  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...
• Forum: Algorithmen, Datenstrukturen und Klassendesign

  AW: Resource-File in Tokyo mit TEXT

    Delphi
    by HJay, 26. Mai 2017
  Wow, vielen Dank, sehr nett!
  
  Delphi zickt aber leider bei mir massiv rum. Ich habe jetzt mal testweise {$R CODEKEY.RES CODEKEY.RC } eingebaut, aber es wird keine RES-Datei erzeugt.
  
  Die Compilierung misslang mit der Meldung "BRCC32 failed unexpectedly. FilenotFoundException: ... RESSOUCRES.RC nicht gefunden." -- Delphi hatte sich also irgendwo gemerkt, dass ich früher mal RESSOURCES.RES...
• Forum: Algorithmen, Datenstrukturen und Klassendesign

  AW: Resource-File in Tokyo mit TEXT

    Delphi
    by HJay, 26. Mai 2017
  Danke, werde ich mir gleich mal anschauen.
• Forum: Algorithmen, Datenstrukturen und Klassendesign

  AW: Resource-File in Tokyo mit TEXT

    Delphi
    by HJay, 26. Mai 2017
  function GetResourceAsString(ResName: pchar; ResType: pchar): string;
  var ResData: PChar;
  ResSize: Longword;
  begin
  ResData := GetResourceAsPointer(resname, restype, ResSize);
  SetString(Result, ResData, ResSize);
  end;
• Forum: Algorithmen, Datenstrukturen und Klassendesign

  AW: Resource-File in Tokyo mit TEXT

    Delphi
    by HJay, 24. Mai 2017
  Update: Ich habe jetzt das rc-File mit meiner TEXT-Resource manuell mit brcc32 zu einer Datei namens RESSOURCES.RES compiliert wie früher --- weiterhin Absturz.
  
  Dann habe ich das Tokyo automatisch in die dpr-Datei nach der uses-Anweisung eingefügte {$R *.res } durch meinen Dateinamen ersetzt {$R RESSOURCES.RES } und VOR die uses-Anweisung verschoben und jetzt klappt es zum Glück wieder. Ich...
• Forum: Algorithmen, Datenstrukturen und Klassendesign

  Resource-File in Tokyo mit TEXT

    Delphi
    by HJay, 24. Mai 2017
  Ich upgrade gerade einige Projekte von XE7 zu 10.2 Tokyo. In einem Projekt verwende ich eine eigene Ressource als rc-Datei mit folgendem String-Inhalt:
  
  codekey TEXT "codekey.txt"
  
  Zugriff im Programm dann über
  
  var ACodeKey : String;
  
  {...}