Autor Beitrag
Kamsen
Hält's aus hier
Beiträge: 9



BeitragVerfasst: Fr 14.01.05 19:41 
Weiß zwar net ob das hier das richtige Forum für die Frage ist aber ich weiß es halt net besser :((



Hi also ich hab mal ne fragen wenn ich nen Text mit Variablen in Tp programmiere und dann im Ausführscreen die ganzen Daten eingebe, ist es mögliche das Endprodukt , also den ferigen Text mit den neu angegeben Wörter irgendwie zwischen zu speicher?

Oder zu kopieren ?

M.f.G Kamsen
Elite
Ehemaliges Mitglied
Erhaltene Danke: 1



BeitragVerfasst: Fr 14.01.05 19:44 
Du bist echt ein Meister der Problemumschreibung ...
Generell kannst du etwas in der folgenden Art machen:
ausblenden Delphi-Quelltext
1:
2:
3:
4:
var
 ZwischenSpeicher: string;
...
 ZwischenSpeicher := variable1 + v2 + v3 ...


Musst eventuell auf tp anpassen, da ich nur Delphi schreibe..
Kamsen Threadstarter
Hält's aus hier
Beiträge: 9



BeitragVerfasst: Fr 14.01.05 19:53 
Also ich mein das der text dann als Textdatei gespeichert wird.

Weil ich will ne Tabelle erstellen ( Ich muss die Tabellen regelmäßiug erstellen )
und da müssen ne Menge kleinigkeiten in Html eingefügt werden weil sich halt die contents immer ändern und weil ich mir die ganze Arbeit die ich immer dabei hab vereinfachen und ne art script programmieren wollte
brauch ich irgendwie ne Möglichkeit den formatierten Text zu speicher.
MrSaint
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 1033
Erhaltene Danke: 1

WinXP Pro SP2
Delphi 6 Prof.
BeitragVerfasst: Fr 14.01.05 20:32 
Erstmal :welcome: :)

Schau dir in TP mal die Funktionen/Prozeduren Assign, Read(Ln) und Write(Ln) an. Damit kann man in Dateien schreiben... Ich glaube die erste hieß Assign, in Delphi heißt das nämlich inzwischen AssignFile, aber in TP war es glaub noch Assign....




MrSaint

_________________
"people knew how to write small, efficient programs [...], a skill that has subsequently been lost"
Andrew S. Tanenbaum - Modern Operating Systems
Kamsen Threadstarter
Hält's aus hier
Beiträge: 9



BeitragVerfasst: Fr 14.01.05 20:45 
Thx :)

Also über die Funktionen Read(ln) und writeln bin ich mir schon im klaren :)

Und mit dem assign hab ich nen par Probleme :((
HMhh hab mir zwar die Helpdatei in Tp angeschaut aber bin immer noch nicht schlauer zumal ich daran scheitere wie ich das mit 30 Variablen anstellen soll o.O
MrSaint
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 1033
Erhaltene Danke: 1

WinXP Pro SP2
Delphi 6 Prof.
BeitragVerfasst: Fr 14.01.05 20:51 
Oh, Sorry, hatte vergessen dich auf ReWrite, Reset und Append hinzuweisen :oops:

untested:
ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
var
  tFile  : text;

...

Assign(tFile, 'C:\irgendwo\irgendwas.bla');
ReWrite(tFile);
Writeln(tFile, '1. Zeile');
Close(tFile); // <- bin ich mir auch grad nemme sicher, ob das Close hieß :oops: schon lang her ;) *gg*



MrSaint

_________________
"people knew how to write small, efficient programs [...], a skill that has subsequently been lost"
Andrew S. Tanenbaum - Modern Operating Systems
Kamsen Threadstarter
Hält's aus hier
Beiträge: 9



BeitragVerfasst: Fr 14.01.05 21:22 
ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
var
  tFile  : text;

...

Assign(tFile, 'C:\irgendwo\irgendwas.bla');
ReWrite(tFile);
Writeln(tFile, '1. Zeile');
Close(tFile);



Da meckert vor dem ersten tFile und erwartet nen :
danach wird tFile als Doppelterbezeichner als Fehlerquelle angegeben :((
Ich glaub ich muss das irgendwie anders machen Thx für Hilfe und Zeit ;)

Moderiert von user profile iconChristian S.: Delphi-Tags hinzugefügt.
Kamsen Threadstarter
Hält's aus hier
Beiträge: 9



BeitragVerfasst: Fr 14.01.05 21:48 
ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
VAR F: Text;
    s: String;
BEGIN
   s:='dein Text';
   Assign(f,'deineDatei.txt');
   Rewrite(f);
   writeln(f,s);
   close(f);
END.


SO das klappt ja , könnte mir jmd vllt noch erklären wie ich zb.
jetzt in die Textdatei folgendes speichern kann:

erstmal Frage der Vriablen
ausblenden Delphi-Quelltext
1:
2:
writeln('Name?');
readln(Name);

so wie kann ich jetzt s:=' hallo mein name ist', name; speichern?
und falls die Zeile zu lang wird muss ich dann immer weiter Variablen mit s2,s3....sn kreieren?
Könnt vllt jmd mal den Code posten ?

Moderiert von user profile iconChristian S.: Delphi-Tags hinzugefügt.
patrick
ontopic starontopic starontopic starontopic starontopic starofftopic starofftopic starofftopic star
Beiträge: 1481

WIN2k, WIN XP
D6 Personal, D2005 PE
BeitragVerfasst: Sa 15.01.05 01:24 
Zitat:

so wie kann ich jetzt s:=' hallo mein name ist', name; speichern?

indem du das "," durch ein "+" ersetzt :wink:
ausblenden Delphi-Quelltext
1:
s:=' hallo mein name ist'+ name;					

_________________
Patrick
im zweifelsfall immer das richtige tun!!!
Kamsen Threadstarter
Hält's aus hier
Beiträge: 9



BeitragVerfasst: Sa 15.01.05 09:56 
Ah thx Patrick, aber ich hab es mir ein bissken umständlicher gemacht.
Ich hab immer neue Variablen kreiert ( s2,s3,s4)
So geht zwar auch aber deine Lösung ist wesentlich comfortabler :)
Thx
So danke ich nochmal allen für ihr Hilfe :)

M.f.G Kamsen