Python Variablen durchnummerieren und abrufen? ich möchte sehr viele Variablen machen, und mit allen in einer Schleife das Gleiche machen. Wie kann ich z. B. "Wert0 = [(0, 1, 2), (3, 4, 5)]", "Wert1 = [(3, 4, 5), (6, 7, 8)]",... machen und dann in der Schleife "for x, y, z in (Wert0)" dann "in (Wert1)",... Hoffe, dass mein Problem verständlich ist Delphi: CMD-Befehl mit Variable ausführen - Möglich? Hey, wir ärgern uns immer in der Schule mit dem Shutdown-CMD-Befehl. Grosse textdatei einlesen - Entwickler-Forum. Ich programmiere häufig etwas mit Delphi (Embarcadero) und dieses mal ist es ein Programm, um geziehlt einen PC aususchalten, mit einem auswählbaren Grund. Dazu wird ein CMD Befehl ausgeführt: ShellExecute(0, nil, '', '/k shutdown -r -m \\an-23-10', nil, SW_SHOWNORMAL); Hier ist an-23-10 der Computername. Es würde sogar funktionieren, jedoch kann ich nur einen Computer im Quellcode einbauen. Ich könnte natürlich den Code mit mehreren if-Schleifen verlängern, jedoch wäre das sehr unhandlich und unprofessionell. Kann man in diesen Befehl Variablen einbaut, welche Strings sind und im vorraus definiert wurden (Combo-Box).
Home » Tipps & Tricks » Dateien/Verzeichnisse » Textdateien » Laden und Speichern von Texten aus Memofeldern in Dateien Es ist ganz einfach den Inhalt von Memo- oder Richedit-Feldern in Dateien zu speichern: Speichern procedure TForm1. Button1Click(Sender: TObject); begin ('C:\'); end; Laden Bei RichEdit-Feldern sollte die Eigenschaft PlainText auf False gestellt werden, um die Rich-Text-Attribute mit abzuspeichern. Häufig zu Fehlern führt die Verwendung relativer Pfadangaben. Wenn man die Datei ins Verzeichnis der eigenen Anwendung speichern möchte sollte man nicht (''); sondern (ExtractFilePath(ParamStr( 0)) + '\'); verwenden. Und jetzt das Ganze in Verbindung mit dem Open/Save-Dialog: if SaveDialog1. Execute then (leName); if OpenDialog1. Execute then Die Methoden LoadFromFile und SaveToFile werden von der abstrakten Klasse TStrings zur Verfügung gestellt. Die oben gezeigte Vorgehensweise lässt sich auf alle von TStrings abgeleiteten Klassen verwenden (z. Textdateien erstellen/auslesen |. B. TStringList).
znysk Erfahrenes Mitglied #1 Ich habe einige Editfelder und möchte diese in ner Datei Speichern, und später wieder lesenund in die Feler schreiben, kann mir da jemand helfen, da ich noch nie mit Dateien gearbeitet habe! Delphi Editfelder in Datei schreiben,Lesen | tutorials.de. es könnte auch ein kleines Beispielprogramm sein DANKE #2 ich hab einfach ma nen bißchen code aus nem programm von mir kopiert, ich habs unter anderem zum speichern eines gezeichneten graphen genommen, is aber eigentlich ganz simpel: hier erstma zum öffnen, der liest mit dem readln befehl eine zeile nach der anderen aus. den opendialog kannst du einfach einfügen, das is nen object in delphi Code: var mbfv:textfile; if opendialog1. execute then begin if fileexists(leName) then begin assignfile(mbfv, leName); reset(mbfv); readln(mbfv, x1); end; das speichern geht ähnlich: rewrite(mbfv); writeln(mbfv, 'text der geschrieben werden soll'); beim speichern musst du nur aufpassen, da der dateien überschreibt falls die vorhanden sind musst also noch über ne abfrage (if fileexist('pfad')) gucken ob die datei schon existiert und dann halt ne abfrage reinbaun so, ich hoffe das reicht, wenn du damit nich klar kommst meld dich... #3 Hallo, das kannst du am besten per ini-Dateien lösen.
[/highlight] So, wenn wir jetzt mal 'draufschauen, dann sehen wir, dass der Shellexecute - Befehl per sogenannter Pipe (" >> ") in eine Datei "" schreibt. Zum Anzeigen / ausgeben wird aber die Datei "" geöffnet, also eine ganz andere Datei. Wenn die wie im Beispiel zunächst per Rewrite/Writeln angelegt wird, klappt es, wenn nicht, stürzt das Programm ab, weil es die Datei nicht findet. Es muss also in der Assign() - Zeile auf "" verwiesen werden damit das insgesamt funktioniert. Viel Erfolg! Tino Ich habs gleich!... sagte der Programmierer.
621 Beiträge Delphi 2006 Professional 3. Jan 2005, 09:41 Das ist nicht sehr günstig ständig Position und Größe abzufragen und zu vergleiche. Besser wäre: repeat until BytesRead < sizeof(Buffer); Michael Ein Teil meines Codes würde euch verunsichern. 3. Jan 2005, 09:54 Zitat von Luckie: Stimmt. Luckie's Version ist eindeutig schneller. Zitat