200+ Texte in ein memo laden

[Spectre]

danke bummi.
es passiert aber leider immer noch nichts :S

[DeddyH]

Dann stepp doch einfach mal durch (Haltepunkt setzen und mit F7/F8 weiterschalten).

[Spectre]

ist nicht wirklich ergiebig...wobei das problem sicherlich zwischen meinen ohren sitzt und ich zuwenig von delphi-interna verstehe
ich finde diesen lösungsansatz für mich sehr praktisch, liegt der fehler im code der prozedur selbst vlt? :F

[DeddyH]

Du findest es praktischer, wenn wir Deine Fehler suchen, oder wie ist das zu verstehen?

[Davidlocke13]

200 txt dateien mach doch eine Datenbnak Datei die du dran hängst an dein Programm

[Spectre]

Zitat von DeddyH:

Du findest es praktischer, wenn wir Deine Fehler suchen, oder wie ist das zu verstehen?

Hättest du bei Seite 1 des Topics angefangen Deddy wäre es offensichtlich das Furtbichler der vater diesen codes ist und er diese variante vorgeschlagen hat.
ich versuche nur sie zum laufen zu kriegen, irgendwo ist der wurm drin :F

[DeddyH]

Genau, und deshalb schaut man im Debugger nach, was da schief läuft.

[edit]http://www.delphipraxis.net/41047-tu...ortgeschr.html[/edit]

[Spectre]

jo danke für den link. hab bis jetzt rumprobiert, hat lange genug gedauert..
habs jetzt mit einer .res file gelöst in die ich die textfiles einspeise und mit

Code:

procedure TForm1.Button2Click(Sender: TObject);
var
  rs: TResourceStream;
  begin
  rs := TResourceStream.Create(hinstance, 'ELFENBEINKUESTE', RT_RCDATA);
  try
  smemo1.Lines.LoadFromStream(rs);
  finally
    rs.Free;
  end;
end;

drauf zugreife. Das war ein Akt
Aber der lerneffekt war gut