XProfan

Español

liveFamilie

¡Hola,
Yo hatte veces otra vez algo Tiempo para lesen y probieren.
Yo quería una speichern Diálogo hacer y habe me el Beispiele angeschaut y ausprobiert aber nichts klappt así correcto.
En esta Beispielen de MMJ-Quellcode, Handbuch y HilfeDatei :

Kompilieren Marca Separación

Name$ = @SaveFile$("Datei speichern","Normal (.txt)|*.txt")

Hierbei erscheint kein Ventana, lo passiert gar nichts en me.

Kompilieren Marca Separación

Name$ = @SaveFile$("Datei speichern","Test.txt")

Hierbei erscheint el Ventana, Yo kann una Namen eingeben y en OK clic, pero si Yo entonces nachschaue es no Expediente producido worden.

Wo es Por favor, schön mein Denkfehler ?
Yo möchte sólo el speichern-dialog aufrufen, una Dateinamen eingeben (Vorgabe debería txt ser) y si yo en speichern/OK gehe, debería una Expediente producido voluntad.
Bitte en Profano V8, para Hinweise wäre Yo dankbar.

Saludo
Toni

XProfan 8
"Profan das Besondere"
was auch in einem gewissen Alter noch Spass macht und Fit hält.

28.03.2012 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

« Dieser Contribución wurde como Solución gekennzeichnet. »

liveFamilie

¡Hola,
@Nico y Dieter

sí con euren beiden Lösungen bin Yo otra vez una pequeña Schritt más. DANKE

@Dieter
Que el V9.1 Tuve zwar ya gelesen, como Yo pero no así oft Internet bin, Tuve lo otra vez verdrängt.
Dafür war entonces heute veces una Tag el ganzen Programa updates.
Aber getestet si alles todavía así es como war, dazu bin Todavía no gekommen.

Auch hier Gracias para mi vergesslichkeit, el Alter lässt grüßen.

Toni

XProfan 8
"Profan das Besondere"
was auch in einem gewissen Alter noch Spass macht und Fit hält.

29.03.2012 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Julian
Schmidt

Das Befehl funktioniert genauso, como debería!
Lo erstellt una Diálogo a Auswahl uno Dateipfades, y son el Pfad después de el Wahl zurück. Anschließend kannst du el Pfad en deinen Programa verarbeiten, etwa una Expediente esta redactar o.ä..
Siehe en el Ayuda SaveFile.

XProfan X2
Win7 Home Premium, SP1, AMD Athlon(tm) II Neo K125 Processor
˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗
Webseite [...]

28.03.2012 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Nico
Madysa

¡Hola Toni,

Yo versuche veces, en beide Fragen einzugehen.

liveFamilie (28.03.12)

Kompilieren Marca Separación

Name$ = @SaveFile$("Datei speichern","Normal (.txt)|*.txt")

Hierbei erscheint kein Ventana, lo passiert gar nichts en me.

Probiere pero por favor veces, el folgenden Ver código fuente de y sage me, si una Auswahldialog erscheint:

Kompilieren Marca Separación

cls
declarar name$
name$ = SaveFile$("Datei speichern","Normal (.txt)|*.txt")
end

En me funktioniert él nämlich problemlos.

liveFamilie (28.03.12)

Wo es Por favor, schön mein Denkfehler ?
Yo möchte sólo el speichern-dialog aufrufen, una Dateinamen eingeben (Vorgabe debería txt ser) y si yo en speichern/OK gehe, debería una Expediente producido voluntad.
Bitte en Profano V8, para Hinweise wäre Yo dankbar.

Su Denkfehler liegt en él, dass du con SaveFile$() sólo el Nutzer el Möglichkeit bietest, se auszusuchen, wo el Expediente gespeichert voluntad se.

Dafür, dass ellos entonces auch tatsächlich gespeichert se, hast du como Programmierer Sorge a tragen.

Como du como al besten vorgehst, hängt su de, qué du speichern willst.
Ein Bild kannst du con

Kompilieren Marca Separación

SavePic Dateiname$, PicHandle&

speichern, una Textdatei kannst du en el folgende Weise speichern:

Kompilieren Marca Separación

'Das Handle fileHandle& dient el Zugriff en el Expediente
fileHandle& = Asignar(Dateiname$)
'Erstelle una neue Expediente. Falls ya una besteht, lösche ellos:
Rewrite fileHandle&
'Wirf alles, qué du en el Textdatei posición haben willst, por imprimir hinein
imprimir fileHandle&, "Das es mi Textdatei"
imprimir fileHandle&, superWichtigerText$
'Anschließend muss el Expediente geschlossen voluntad
Cerrar fileHandle&

Yo hoffe, Yo podría helfen.

XProfan X2
Win7 Home Premium, SP1, AMD Phenom(tm) II N830 Triple-Core Processor
Nico Madysa

28.03.2012 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

liveFamilie

¡Hola Nico,

si yo deinen Vorgeschlagenen Code benutze (oder auch el de me ausprobierten) erscheint null Komma gar nichts.
Yo besitze 3 PC's con XP, Vista y 7 en allen Yo Profano 8 (wegen el Compiler) en él.
Lo blinkt sólo veces kurz una Ventana en y es inmediatamente otra vez weg, setzte Yo antes End una Waitinput, erscheint sólo el Ventana de lo que CLS producido se.
Benutze Yo una höhere Profano Versión entonces klappt lo con el Ventana, aber el es sí no mein Verlangen.
Klappt lo porque en dir auch con el V8 y nichts höherem ?

@Julian
Yo habe viel gelesen auch bajo el Ayuda (bajo SaveFile) aber desafortunadamente nichts genaues gefunden.
Daher Yo mich sí entschlossen veces hier en Rat y Ayuda a suchen.

Aber Yo bekomme bajo V8 sí todavía no una vez el Ventana hin (siehe Texto Nico).

Saludo
Toni

XProfan 8
"Profan das Besondere"
was auch in einem gewissen Alter noch Spass macht und Fit hält.

29.03.2012 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Dieter
Zornow

Teste veces esta Code, el se ejecuta en me con Profano 8 bajo Win 7 64bit einwandfrei.
lo se una Textdatei abgespeichert.

Kompilieren Marca Separación

CLS
Declarar name$
Name$ = SaveFile$("Datei speichern","*.txt")

If name$ <> ""

    assign #1,name$
    rewrite #1
    imprimir #1,"Das es una Test"
    close #1

endif

waitinput