Forum: Object-Pascal / Delphi-Language
Delphi
by SaFu,
8. Okt 2007
:( ich könnt mir echt in denn Ar... beissen aber ich bin ja Froh das es hier soviel Profies gibt :coder:
Forum: Object-Pascal / Delphi-Language
Delphi
by SaFu,
8. Okt 2007
Komisch so hatte ich das auch schonmal da ging das net
Vielleicht hatte ich es auch net richtig geschrieben aber jetzt geht es dank dir tausendmal
Gruss sascha wünsch euch noch einen schönen abend
Forum: Object-Pascal / Delphi-Language
Delphi
by SaFu,
8. Okt 2007
nein es wird immer nur die erste überschrieben
damit
procedure TForm1.sysconfsumschreiben;
var alt,neu : String;
sl: TStringList;
i: integer;
begin
alt:=(ExtractFilePath(ParamStr(0)) + '\Dateisysconfs\SYSCONF.S');
neu:= (ExtractFilePath(ParamStr(0)) + '\Dateisysconfs\neueSysconf\Sysconf.s');
Forum: Object-Pascal / Delphi-Language
Delphi
by SaFu,
8. Okt 2007
Der geht ja auch aber so wie ich es mach nur die erste zeile
Forum: Object-Pascal / Delphi-Language
Delphi
by SaFu,
8. Okt 2007
Das hier im Memo1
DESK-0 = TASK(0) LPT(PP0) WX() WY() FONT() TITLE(Server) START(pw) //zeile1 (index 0)
DESK-1 = TASK(1) LPT(PP0) WX() WY() FONT() TITLE(Server) START(pw) //zeile2 (index 1)
DESK-2 = TASK(2) LPT(PP0) WX() WY() FONT() TITLE(Server) START(pw) //zeile3 (index 2)
DESK-3 = TASK(3) LPT(PP0) WX() WY() FONT() TITLE(Server) START(pw) //zeile4 (index 3)
und soll gegen das hier...
Forum: Object-Pascal / Delphi-Language
Delphi
by SaFu,
8. Okt 2007
meinst du so
.
.
.
sl.Text := StringReplace(sl.Text,Memo1.Lines,Memo2.Lines,);
sl.Text := StringReplace(sl.Text,Memo1.Lines,Memo2.Lines,);
sl.Text := StringReplace(sl.Text,Memo1.Lines,Memo2.Lines,);
Forum: Object-Pascal / Delphi-Language
Delphi
by SaFu,
8. Okt 2007
Genau aber nur die erste bzw. den index 0 und ich wies net wie ich das anstellen kann das ich den index 0,1,2,3 ersetzen kann ich hänge das programm mal an
Forum: Object-Pascal / Delphi-Language
Delphi
by SaFu,
8. Okt 2007
kann mir da keiner helfen??? :cry:
Forum: Object-Pascal / Delphi-Language
Delphi
by SaFu,
8. Okt 2007
Es wird aus einer datei 4 zeilen ins memo1 geladen die werden dann mit einem Edit feld umgeschrieben
Dieses wird dann in memo2 angezeigt
jetzt schreibe ich die 4 zeilen wieder um und dann soll die datei wieder gespeichert werden
also ich will einfach nur
sl := StringReplace(sl,Memo1.Lines,Memo2.Lines,);// hier
Forum: Object-Pascal / Delphi-Language
Delphi
by SaFu,
8. Okt 2007
Hi
habe mal ein schleifen Problem
bekomme es leider nicht hin die nächsten vier zeilen von meinem memo umzuschreiben
die erste zeile von memo1 wird mit der zweiten zeile vom memo überschrieben aber wie bekomme ich den rest hin
procedure TForm1.sysconfsumschreiben;