Italia
Foro

Save-Dialog Problem

 
- Page 1 -



liveFamilie
Ciao,
ich hatte mal wieder etwas Zeit zum lesen und probieren.
Ich wollte einen speichern Dialog machen und habe mir die Beispiele angeschaut und ausprobiert aber nichts klappt so richtig.
Bei diesen Beispielen aus MMJ-Quellcode, Handbuch und HilfeDatei :
Name$ = @SaveFile$("Datei speichern","Normal (.txt)|*.txt")

Hierbei erscheint kein Fenster, es passiert gar nichts bei mir.
Name$ = @SaveFile$("Datei speichern","Test.txt")

Hierbei erscheint das Fenster, ich kann einen Namen eingeben und auf OK klicken, aber wenn ich dann nachschaue ist keine File erzeugt worden.

Wo ist bitte schön mein Denkfehler ?
Ich möchte nur den speichern-dialog aufrufen, einen Dateinamen eingeben (Vorgabe sollte txt sein) und wenn ich auf speichern/OK gehe, sollte eine File erzeugt werden.
Bitte in Profan V8, per Hinweise wäre ich dankbar.

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



« Dieser Beitrag wurde als Lösung gekennzeichnet. »


liveFamilie
Ciao,
@Nico und Dieter

ja mit euren beiden Lösungen bin ich wieder einen kleinen Schritt weiter. DANKE

@Dieter
Das mit der V9.1 hatte ich zwar schon gelesen, da ich aber nicht so oft im Internet bin, hatte ich es wieder verdrängt.
Dafür war dann heute mal ein Tag der ganzen Programm updates.
Aber getestet ob alles noch so ist wie es war, dazu bin ich noch nicht gekommen.

Auch hier Danke per meine vergesslichkeit, das 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  
 




Julian
Schmidt
Das Befehl funktioniert genauso, wie er sollte!
Es erstellt einen Dialog zur Auswahl eines Dateipfades, und gibt den Pfad nach der Wahl zurück. Anschließend kannst du den Pfad in deinen Programm verarbeiten, etwa eine File diesen erstellen o.ä..
Siehe in der Aiuto SaveFile.
 
XProfan X2
Win7 Home Premium, SP1, AMD Athlon(tm) II Neo K125 Processor

˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗
Webseite [...] 
28.03.2012  
 




Nico
Madysa
Hallo Toni,

ich versuche mal, auf beide Fragen einzugehen.

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

Hierbei erscheint kein Fenster, es passiert gar nichts bei mir.


Probiere doch bitte mal, den folgenden Quelltext aus und sage mir, ob ein Auswahldialog erscheint:
cls
declare name$
name$ = SaveFile$("Datei speichern","Normal (.txt)|*.txt")
end

Bei mir funktioniert er nämlich problemlos.

liveFamilie (28.03.12)
Wo ist bitte schön mein Denkfehler ?
Ich möchte nur den speichern-dialog aufrufen, einen Dateinamen eingeben (Vorgabe sollte txt sein) und wenn ich auf speichern/OK gehe, sollte eine File erzeugt werden.
Bitte in Profan V8, per Hinweise wäre ich dankbar.


Dein Denkfehler liegt darin, dass du mit SaveFile$() nur dem Nutzer die Möglichkeit bietest, sich auszusuchen, wo die File gespeichert werden soll.

Dafür, dass sie dann auch tatsächlich gespeichert wird, hast du als Programmierer Sorge zu tragen.

Wie du da am besten vorgehst, hängt davon ab, was du speichern willst.
Ein Bild kannst du mit
SavePic Dateiname$, PicHandle&

speichern, eine Textdatei kannst du auf die folgende Weise speichern:
'Das Handle fileHandle& dient dem Zugriff auf die File
fileHandle& = Assign(Dateiname$)
'Erstelle eine neue File. Falls schon eine besteht, lösche sie:
Rewrite fileHandle&
'Wirf alles, was du in der Textdatei stehen haben willst, per print hinein
print fileHandle&, "Das ist meine Textdatei"
print fileHandle&, superWichtigerText$
'Anschließend muss die File geschlossen werden
Close fileHandle&

Ich hoffe, ich konnte helfen.
 
28.03.2012  
 




liveFamilie
Hallo Nico,

wenn ich deinen Vorgeschlagenen Code benutze (oder auch den von mir ausprobierten) erscheint null Komma gar nichts.
Ich besitze 3 PC's mit XP, Vista und 7 auf allen habe ich Profan 8 (wegen dem Compiler) drauf.
Es blinkt nur mal kurz ein Fenster auf und ist sofort wieder weg, setzte ich vor End ein Waitinput, erscheint nur das Fenster was von CLS erzeugt wird.
Benutze ich eine höhere Profan Version dann klappt es mit dem Fenster, aber das ist ja nicht mein Verlangen.
Klappt es denn bei dir auch mit der V8 und nichts höherem ?

@Julian
Ich habe viel gelesen auch unter der Aiuto (unter SaveFile) aber leider nichts genaues gefunden.
Daher habe ich mich ja entschlossen mal hier um Rat und Aiuto zu suchen.

Aber ich bekomme unter V8 ja noch nicht einmal das Fenster hin (siehe Text Nico).

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




Dieter
Zornow
Teste mal diesen Code, der corre bei mir mit Profan 8 unter Win 7 64bit einwandfrei.
es wird ein Textdatei abgespeichert.
CLS
Declare name$
Name$ = SaveFile$("Datei speichern","*.txt")

If name$ <> ""

    assign #1,name$
    rewrite #1
    print #1,"Das ist ein Test"
    close #1

endif

waitinput

Aber warum benutzt du nicht die neue Freewareversion 9.1 die jetzt von Rolands Seite downloadbar ist.
 
XProfan X2
Er ist ein Mann wie ein Baum. Sie nennen ihn Bonsai., Win 7 32 bit und Win 7 64 bit, mit XProfan X2
29.03.2012  
 




liveFamilie
Ciao,
@Nico und Dieter

ja mit euren beiden Lösungen bin ich wieder einen kleinen Schritt weiter. DANKE

@Dieter
Das mit der V9.1 hatte ich zwar schon gelesen, da ich aber nicht so oft im Internet bin, hatte ich es wieder verdrängt.
Dafür war dann heute mal ein Tag der ganzen Programm updates.
Aber getestet ob alles noch so ist wie es war, dazu bin ich noch nicht gekommen.

Auch hier Danke per meine vergesslichkeit, das 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  
 



Answer


Topictitle, max. 100 characters.
 

Systemprofile:

Kein Systemprofil angelegt. [anlegen]

XProfan:

 Posting  Font  Smilies  ▼ 

Bitte anmelden um einen Beitrag zu verfassen.
 

Topic-Options

12.888 Views

Untitledvor 0 min.
Jochen Roxlau14.04.2015
E.T.06.11.2014
Uwe Lang16.09.2013
mein02.06.2013
Di più...

Themeninformationen



Admins  |  AGB  |  Applications  |  Autori  |  Chat  |  Informativa sulla privacy  |  Download  |  Entrance  |  Aiuto  |  Merchantportal  |  Impronta  |  Mart  |  Interfaces  |  SDK  |  Services  |  Giochi  |  Cerca  |  Support

Ein Projekt aller XProfaner, die es gibt!


Il mio XProfan
Private Notizie
Eigenes Ablageforum
Argomenti-Merkliste
Eigene Beiträge
Eigene Argomenti
Zwischenablage
Annullare
 Deutsch English Français Español Italia
Traduzioni

Informativa sulla privacy


Wir verwenden Cookies nur als Session-Cookies wegen der technischen Notwendigkeit und bei uns gibt es keine Cookies von Drittanbietern.

Wenn du hier auf unsere Webseite klickst oder navigierst, stimmst du unserer Erfassung von Informationen in unseren Cookies auf XProfan.Net zu.

Weitere Informationen zu unseren Cookies und dazu, wie du die Kontrolle darüber behältst, findest du in unserer nachfolgenden Datenschutzerklärung.


einverstandenDatenschutzerklärung
Ich möchte keinen Cookie