XProfan

Français

liveFamilie

Salut,
je hatte la fois wieder quelque chose Zeit zum lesen et essayer.
je voulais une Sauver Dialog faire et habe mir qui Beispiele angeschaut et ausprobiert mais rien klappt so richtig.
chez cette Beispielen aus MMJ-Quellcode, Handbuch et HilfeDatei :

Kompilieren Marque Séparation

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

Hierbei erscheint ne...aucune la fenêtre, es passiert gar rien chez mir.

Kompilieren Marque Séparation

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

Hierbei erscheint cela la fenêtre, je peux une Namen eingeben et sur OK klicken, mais si je ensuite nachschaue ist aucun Dossier erzeugt worden.

wohin ist voilà mon Denkfehler ?
je voudrais seulement den Sauver-dialog appel, une Dateinamen eingeben (Vorgabe sollte txt son) et si je sur Sauver/OK vais, sollte une Dossier erzeugt volonté.
s'il te plaît dans Profan V8, pour Hinweise wäre je reconnaissant.

Salut
Toni

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

28.03.2012 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

« cette Beitrag wurde comme Solution gekennzeichnet. »

liveFamilie

Salut,
@Nico et Dieter

oui avec euren beiden Lösungen suis je wieder une kleinen Schritt plus. DANKE

@Dieter
Que le V9.1 J'ai eu zwar déjà gelesen, là je mais pas so souvent im Internet suis, J'ai eu es wieder verdrängt.
Pour cette était ensuite aujourd'hui la fois un journée qui ganzen Programme updates.
mais getestet si alles encore so ist comme était, en supplément suis je encore pas gekommen.

aussi ici merci pour mon vergesslichkeit, cela Alter peut 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 citation

Absatzweise Citation Zeilenweise Citation

Julian
Schmidt

cela Befehl funktioniert genauso, comment il sollte!
Es erstellt une Dialog zur sélection eines Dateipfades, et gibt den Pfad pour qui l'élection zurück. Anschließend peux du den Pfad dans deinen Programme verarbeiten, etwa une Dossier cette erstellen o.ä..
Siehe dans qui Aider SaveFile.

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

28.03.2012 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

Nico
Madysa

allô Toni,

je versuche la fois, sur beide Fragen einzugehen.

liveFamilie (28.03.12)

Kompilieren Marque Séparation

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

Hierbei erscheint ne...aucune la fenêtre, es passiert gar rien chez mir.

Probiere doch s'il te plaît la fois, den folgenden Voir le texte source aus et sage mir, si un Auswahldialog erscheint:

Kompilieren Marque Séparation

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

chez mir funktioniert il nämlich problemlos.

liveFamilie (28.03.12)

wohin ist voilà mon Denkfehler ?
je voudrais seulement den Sauver-dialog appel, une Dateinamen eingeben (Vorgabe sollte txt son) et si je sur Sauver/OK vais, sollte une Dossier erzeugt volonté.
s'il te plaît dans Profan V8, pour Hinweise wäre je reconnaissant.

Dein Denkfehler liegt y, dass du avec SaveFile$() seulement dem Nutzer qui Possibilité bietest, sich auszusuchen, wohin qui Dossier gespeichert volonté soll.

Pour cette, dass vous ensuite aussi réellement gespeichert wird, la hâte du comme Programmierer Sorge trop tragen.

comment du là am besten vorgehst, hängt en ab, quoi du Sauver veux.
un Bild peux du avec

Kompilieren Marque Séparation

SavePic Dateiname$, PicHandle&

Sauver, une Textdatei peux du sur qui folgende Weise Sauver:

Kompilieren Marque Séparation

'cela Handle fileHandle& dient dem Zugriff sur qui Dossier
fileHandle& = Assign(Dateiname$)
'Erstelle une neue Dossier. si déjà une besteht, lösche vous:
Rewrite fileHandle&
'Wirf alles, quoi du dans qui Textdatei stehen avons veux, per imprimer hinein
imprimer fileHandle&, "Das ist mon Textdatei"
imprimer fileHandle&, superWichtigerText$
'Anschließend muss qui Dossier geschlossen volonté
Fermer fileHandle&

je hoffe, je konnte aider.

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

28.03.2012 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

liveFamilie

allô Nico,

si je deinen Vorgeschlagenen Code benutze (ou bien aussi den de mir ausprobierten) erscheint zéro Komma gar rien.
je besitze 3 PC's avec XP, Vue et 7 sur allen habe je Profan 8 (à cause de dem Compiler) sur elle.
Es blinkt seulement la fois kurz un la fenêtre sur et ist tout de suite wieder weg, setzte je avant Fin un Waitinput, erscheint seulement cela la fenêtre quoi de CLS erzeugt wird.
Benutze je une höhere Profan Version ensuite klappt es avec dem la fenêtre, mais c'est oui pas mon Verlangen.
Klappt es car chez dir aussi avec qui V8 et rien höherem ?

@Julian
j'ai viel gelesen aussi sous qui Aider (sous SaveFile) mais malheureusement rien genaues trouvé.
Daher habe je mich oui entschlossen la fois ici um conseil et Aider trop chercher.

mais je bekomme sous V8 oui encore pas einmal cela la fenêtre hin (siehe Text Nico).

Salut
Toni

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

29.03.2012 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

Dieter
Zornow

Teste la fois cette Code, qui fonctionne chez mir avec Profan 8 sous Win 7 64bit einwandfrei.
es wird un Textdatei abgespeichert.

Kompilieren Marque Séparation

CLS
Déclarer nom$
Name$ = SaveFile$("Datei speichern","*.txt")

Si nom$ <> »

    assign #1,nom$
    rewrite #1
    imprimer #1,"Das est un Test"
    close #1

endif

waitinput