Umwandlung von String nach TextFile

[Andreas L.]

Hi,
wie wandle ich einen String in einen textfile-Typ um?

Pchar beispiel:

Code:

pchar('hallo ;-)';

Sowas mein ich ;-)

Greetz und thx

[Luckie]

Bitte was? Gar nicht. Ich seheh auch keinen Grund dies zu tun. Erklär mal genauer, wozu du das brauchst.

[Andreas L.]

Delphi-Quellcode:

Rename(extractfilepath(application.exename)+'\Web-S!te.exe','Web-S!te.bak');

Zitat:

Zitat von Compiler

Inkompitable Typen

Zitat:

Zitat von Delphi-Hilfe

Delphi-Syntax:

procedure Rename(var F; Newname: string);
procedure Rename(var F; Newname: PChar);

Beschreibung

Die mit F angegebene externe Datei erhält den neuen Namen Newname. Bei weiteren Operationen mit F wird die externe Datei unter dem neuen Namen angesprochen.

F ist eine Variable eines beliebigen Dateityps. Newname ist ein Ausdruck des Typs String bzw. des Typs PChar, wenn die erweiterte Syntax aktiviert ist.

Dafür, was nun?

Greetz und thx

[xineohp]

moin,

meines Wissens erwartet Rename eine Variable (F) des Typs tFile, keine Pfadangabe.

[Nightshade]

Try this :

Delphi-Quellcode:

Delphi-Syntax:

function RenameFile(const OldName, NewName: string): Boolean;

[Luckie]

Die Rename Procedur aus der Unit System.pas bezieht sich auf Pascal Dateivariablen. Ein Blick in die Hilfe und das Beispiel angekuckt und du wüßtest, wie man damit umgeht:

Delphi-Quellcode:

uses Dialogs;
var

  f : file;
begin
  OpenDialog1.Title := 'Choose a file... ';
  if OpenDialog1.Execute then 
  begin
    SaveDialog1.Title := 'Rename to...';
    if SaveDialog1.Execute then 
    begin 
      AssignFile(f, OpenDialog1.FileName);
      Canvas.TextOut(5, 10, 'Renaming ' + OpenDialog1.FileName + 
                     ' to ' + SaveDialog1.FileName);
      Rename(f, SaveDialog1.FileName);
    end;
  end;

end;

Ansonsten nutz Die Rename Funktion aus der Windows.pas, da kannst du den alten und neuen Dateinamen einfach angeben.

[Andreas L.]

Aber irgendwie muss ja rename wissen welche datei umbennant werden muss.

hab jetzt ein bisschen gebastelt:

Delphi-Quellcode:

var
 f : file;
 begin
   f:=extractfilepath(application.exename)+'\Web-S!te.exe';
   Rename(f,'Web-S!te.bak');
 end;

Zitat:

Zitat von Compiler

Operator ist auf Operanderntyp nicht anwendbar!

geht nicht...

Greetz

[Luckie]

Hallo!!! Liest du dir auch mal durch, was man dir postet? Ich habe mir sogar die Mühe gemacht das Beispiel aus der Hilfe zu posten.

Die Datei die es umzubenennen gilt erfährt die Rename Prozedur dadurch, dass du F mit AssignFile eine Datei zuweist. Steht alles in der Hilfe, im Berispiel und jetzt sogar hier im Forum.

[Andreas L.]

hab jetzt einfach renamefile benutzt.

@Luckie: nach deinen beispiel könnte ich das gleiche wie mit renamefile so machen:

Delphi-Quellcode:

var
f : file;
begin
Assignfile(f, 'C:\text.txt');
rename(f, C:\_text.txt);
end;

Greetz und thx

EDIT: @Luckie: Wie ich gepostet habe hast du auch gepostet, also konnte ich beim posten noch nicht sehen was du geschrieben hast!

[Luckie]

Da fehlt noch ein CloseFile.

[Chewie]

Wieso denn, er öffnet die Datei doch nicht. :gruebel:

[MathiasSimmack]

Du hast aber mit "AssignFile" die Variable zugewiesen, damit du auf die Datei zugreifen kannst. Du benennst sie bei der gezeigten Variante ja nicht direkt über den alten und neuen Namen um, sondern du nimmst den "Umweg" über die Dateivariable (F, in dem Fall). Also sollte man die Variable wieder "freigeben"

Zitat:

Zitat von Die Delphi-Hilfe

Die Prozedur CloseFile beendet die Zuordnung zwischen einer Dateivariablen und einer externen Datei (Delphi).

PS: Mit "Du" meine ich nicht dich persönlich. ;)

[xineohp]

hm,

Borland scheint das aber in dem oben zitierten Beispielcode zu rename anders zu halten ?.

[Chewie]

Ach verdammt, ich hätte doch in die Hilfe kucken sollen und mich nicht auf meine Instinkte verlassen sollen :?

[MathiasSimmack]

Zitat:

Zitat von xineohp

Borland scheint das aber in dem oben zitierten Beispielcode zu rename anders zu halten ?.

Ich will nicht behaupten, dass ich 100% Recht habe. Mag sein, dass es in dem Fall vllt. nicht notwendig ist. Aber ich denke, schaden kann´s nicht. Und es gibt auch Beispiele in der Hilfe, in denen Borland das ein oder andere ignoriert, wo du von Profis eins auf die Ohren bekommst wenn du das auch vergisst. ;)

[Andreas L.]

Zitat:

Zitat von MathiasSimmack

PS: Mit "Du" meine ich nicht dich persönlich. ;)

????