Il codice è questo

Codice:

#include<GUIConstants.au3> GUICreate("Notepad", 400, 400) GUISetState() $titolo = GUICtrlCreateInput ("", 100, 10) $testo = GUICtrlCreateEdit ("", 100, 80, 200, 250) $registra = GUICtrlCreateButton ("Registra", 155, 340, 90, 50) while 1    $msg = GUIGetMsg()    Select    Case $msg = $GUI_EVENT_CLOSE       ExitLoop    Case $msg = $registra       FileWrite ($titolo, $testo)    EndSelect WEnd

è una cosa mooooolto semplice inserisci un titolo estenzione compresa un testo e premi registra per salvare il tutto il problema stà che non salva un bel niente non crea neanche il file....
Dove sbaglio?????

ecco il codice corretto:

Codice:

#include<GUIConstants.au3> #include<File.au3> GUICreate("Notepad", 400, 400) GUISetState() $titolo = GUICtrlCreateInput ("", 100, 10) $testo = GUICtrlCreateEdit ("", 100, 80, 200, 250) $registra = GUICtrlCreateButton ("Registra", 155, 340, 90, 50) while 1   $msg = GUIGetMsg()   Select   Case $msg = $GUI_EVENT_CLOSE       ExitLoop   Case $msg = $registra      _FileCreate(GUICtrlRead($titolo))       FileWrite (GUICtrlRead($titolo), GUICtrlRead($testo))   EndSelect WEnd

2 errori:
1)il file devi crearlo, con _filecreate che si trova nella libreria file.au3
2)devi inserire i guictrlread per leggere quello che c'è nella gui

ok grazie appena finisco posto il codice corretto

domanda generale come facci a sapere quando devo inserire una libreria e quando invece ne devo inserire un altra???

sull'helpfile trovi tutte le librerie da includere insieme al comando...
comunque di solito devi usare una libreria se il comando comincia con _

Avevo pensato anche a fare una cosa così ma non salva il file con il nome scelto sapreste illuminarmi di nuovo

Codice:

#include<GUIConstants.au3> #include<File.au3> GUICreate("Notepad", 400, 400) GUISetState() $menu = GUICtrlCreateMenu ("File..") $menu1 = GUICtrlCreateMenuitem ("Salva con nome", $menu) $titolo = GUICtrlCreateInput ("", 100, 10) $testo = GUICtrlCreateInput ("", 100, 80, 200, 250) $registra = GUICtrlCreateButton ("Registra", 155, 340, 90, 50) while 1    $msg = GUIGetMsg()    Select    Case $msg = $GUI_EVENT_CLOSE       ExitLoop    Case $msg = $registra       _FileCreate(GUICtrlRead($titolo))       FileWrite (GUICtrlRead ($titolo), GUICtrlRead ($testo))    Case $msg = $GUI_EVENT_CLOSE       ExitLoop    Case $msg = $menu1       $var = FileSaveDialog ("Salva con nome", "C:\Documents And Setting\@Username\", "Testo (*.txt, *.bat)", 8 + 16)       FileWrite(Guictrlread ($var), Guictrlread ($testo))    EndSelect WEnd

dovrebbe prendere il nome che si inserisce da salva con nome e il testo da testo ma neanche a dirlo non funge
sono una crapa


Risolto
si doveva aggiungere

Codice:

FileWrite("" & $var, GUICtrlRead ($testo))

al posto di

Codice:

FileWrite(Guictrlread ($var), Guictrlread ($testo))

devi prima aprire il file...

Codice:

fileopen ("nomefile", 1)

usando fileopen puoi anche togliere filewrite che tanto se il file da aprire non esiste lo crea...
ah, alla fine devi anche mettere:

Codice:

fileclose("nomefile")

a stò punto finisco....
se io volessi aprire un file allo stesso modo di prima solo che lo voglio aprire dentro la inputbox

Spoiler:
	vi stò facendo lavorare

scusa, ma volevi fare questo?

http://xhack.forumitalian.net/autoit-f8/file-editor-t204.htm

guardaa la seconda versione e dimmi se intendi proprio quello...
studiati il source e vedrai che è molto semplice

Ecco quello che voglio fare io

Codice:

#include<GUIConstants.au3> #include<File.au3> GUICreate("Codice fiscale", 400, 400) GUISetState() $menu = GUICtrlCreateMenu ("File..") $menu1 = GUICtrlCreateMenuitem ("Salva con nome", $menu) $menu2 = GUICtrlCreateMenuitem ("Apri..", $menu) $about = GUICtrlCreateMenu ("&About...") $about1 = GUICtrlCreateMenuitem ("About", $about) $titolo = GUICtrlCreateInput ("", 100, 10) $testo = GUICtrlCreateInput ("", 100, 80, 200, 250) $registra = GUICtrlCreateButton ("Registra", 155, 340, 90, 20) while 1    $msg = GUIGetMsg()    Select    Case $msg = $GUI_EVENT_CLOSE       ExitLoop    Case $msg = $registra       _FileCreate(GUICtrlRead($titolo))       FileWrite (GUICtrlRead ($titolo), GUICtrlRead ($testo))    Case $msg = $GUI_EVENT_CLOSE       ExitLoop    Case $msg = $menu1       $var = FileSaveDialog ("Salva con nome", "C:\Documents And Setting\@Username\", "Testo o Batch (*.txt, *.bat)", 8 + 16)       FileWrite("" & $var, GUICtrlRead ($testo))    Case $msg = $GUI_EVENT_CLOSE       ExitLoop    Case $msg = $menu2       $var1 = FileOpenDialog ("Apri", "C:\Documents And Setting\@Username\", "Testo o Batch (*.txt;*.bat)", 1 + 2)       FileOpen ("" & $var1)    Case $msg = $GUI_EVENT_CLOSE       ExitLoop       Case $msg = $about1       MsgBox (0, "About", "Edit by Dark-Wolf in collaborazione con http://xhack.forumitalian.net")    EndSelect WEnd

se si va su file poi su apri appare il menù di navigazione una volta scelto il file io voglio fare in modo che si apra nell'input box così da modificarlo e salvarlo nuovamente

Inserisco in un altro post per non fare casino...
Grazie dark orbo come sono (5, 5.50 astigmatismo e miopia) non avevo visto la seconda versione del tuo file editor adesso posto il mio
Notepad V-1.0
funge da notepad e da compilatore batch

Codice:

#NoTrayIcon #include<GUIConstants.au3> #include<File.au3> GUICreate("Notepad", 400, 400) GUISetState() $menu = GUICtrlCreateMenu ("File..") $menu1 = GUICtrlCreateMenuitem ("Salva con nome", $menu) $menu2 = GUICtrlCreateMenuitem ("Apri..", $menu) $menu3 = GUICtrlCreateMenuitem ("Istruzioni", $menu) $about = GUICtrlCreateMenu ("&About...") $about1 = GUICtrlCreateMenuitem ("About", $about) $titolo = GUICtrlCreateInput ("", 100, 35) $testo = GUICtrlCreateEdit ("", 100, 80, 200, 250) $registra = GUICtrlCreateButton ("Registra", 155, 340, 90, 20) $istruzione = GUICtrlCreateLabel ("Inserire il titolo per il salvataggio veloce", 100, 10) while 1    $msg = GUIGetMsg()    Select    Case $msg = $GUI_EVENT_CLOSE       ExitLoop    Case $msg = $registra       _FileCreate(GUICtrlRead($titolo))       FileWrite (GUICtrlRead ($titolo), GUICtrlRead ($testo))       MsgBox (0, "Ok", "File scritto")    Case $msg = $GUI_EVENT_CLOSE       ExitLoop    Case $msg = $menu1       $var = FileSaveDialog ("Salva con nome", "C:\Documents And Setting\@Username\", "Testo o Batch (*.txt, *.bat)", 8 + 16)       FileWrite("" & $var, GUICtrlRead ($testo))    Case $msg = $GUI_EVENT_CLOSE       ExitLoop    Case $msg = $menu2       $var1 = FileOpenDialog ("Apri", "C:\Documents And Setting\@Username\", "Testo o Batch (*.txt;*.bat)", 1 + 2)       GUICtrlSetData ($titolo, $var1)       GUICtrlSetData ($testo, FileRead ($var1 ))    Case $msg = $GUI_EVENT_CLOSE       ExitLoop       Case $msg = $about1       MsgBox (0, "About", "Edit by Dark-Wolf in collaborazione con http://xhack.forumitalian.net")    case $msg = $GUI_EVENT_CLOSE       ExitLoop    Case $msg = $menu3       MsgBox (0, "Istruzioni", "Inserire il titolo e premere registra per il salvataggio veloce da usare per modificare un file il documento      verrà salvato nella stessa cartella del notepad")       MsgBox (0, "Istruzioni2", "Andare su file e poi Salva con nome in modo da scegliere il percorso di salvataggio consigliato per creare un nuovo file")    EndSelect WEnd

devo modificare un pò il lato grafico e devo scoprire il comando per cambiare scrittura.....
ho messo in collaborazione con xhack (link completo) visto che mi avete aiutato molto grazie ancora

Oggi stavo aggiornando il mio notepad avevo pensato di mettergli qualche stringa preistallata
vi posto il codice


#NoTrayIcon
#include<GUIConstants.au3>
#include<File.au3>
GUICreate("Notepad", 400, 400)
GUISetState()
$menu = GUICtrlCreateMenu ("File..")
$menu2 = GUICtrlCreateMenuitem ("Apri..", $menu)
$menu1 = GUICtrlCreateMenuitem ("Salva con nome", $menu)
$menu4 = GUICtrlCreateMenuitem ("Stringhe", $menu)
$Help = GUICtrlCreateMenu ("Help")
$help1 = GUICtrlCreateMenuitem ("Aiuto Stringhe", $Help)
$menu3 = GUICtrlCreateMenuitem ("Istruzioni", $menu)
$about = GUICtrlCreateMenu ("&About")
$about1 = GUICtrlCreateMenuitem ("About", $about)
$titolo = GUICtrlCreateInput ("", 100, 35)
$testo = GUICtrlCreateEdit ("", 100, 80, 200, 250)
$registra = GUICtrlCreateButton ("Registra", 155, 340, 90, 20)
$istruzione = GUICtrlCreateLabel ("Inserire il titolo per il salvataggio veloce", 100, 10)
$cod = ""
while 1
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
ExitLoop
Case $msg = $registra
_FileCreate(GUICtrlRead($titolo))
FileWrite (GUICtrlRead ($titolo), GUICtrlRead ($testo))
MsgBox (0, "Ok", "File scritto")
Case $msg = $GUI_EVENT_CLOSE
ExitLoop
Case $msg = $menu1
$var = FileSaveDialog ("Salva con nome", "C:\Documents And Setting\@Username\", "Testo o Batch (*.txt;*.bat)", 8 + 16)
FileWrite("" & $var, GUICtrlRead ($testo))
Case $msg = $GUI_EVENT_CLOSE
ExitLoop
Case $msg = $menu2
$var1 = FileOpenDialog ("Apri", "C:\Documents And Setting\@Username\", "Testo o Batch (*.txt;*.bat)", 1 + 2)
GUICtrlSetData ($titolo, $var1)
GUICtrlSetData ($testo, FileRead ($var1 ))
Case $msg = $GUI_EVENT_CLOSE
ExitLoop
Case $msg = $about1
MsgBox (0, "About", "Edit by Dark-Wolf in collaborazione con http://xhack.forumitalian.net")
case $msg = $GUI_EVENT_CLOSE
ExitLoop
Case $msg = $menu3
MsgBox (0, "Istruzioni", "Inserire il titolo e premere registra per il salvataggio veloce da usare per modificare un file il documento verrà salvato nella stessa cartella del notepad")
MsgBox (0, "Istruzioni2", "Andare su file e poi Salva con nome in modo da scegliere il percorso di salvataggio consigliato per creare un nuovo file")
case $msg = $GUI_EVENT_CLOSE
ExitLoop

case $msg = $menu4
$box = InputBox ("Inserire titolo Stringa", "Inserire Titolo")
Switch GUICtrlRead($box)
Case "Notepad"
$cod="notepad"
Case "ciao"
$cod="ciao che fai"
Case "che fai"
$cod="io niente"
EndSwitch
GUICtrlSetData ($testo, $cod)

EndSelect
WEnd


Allora il problema stà quando inserisco una stringa che sia diversa dalla prima se per esmpio scrivo ciao come risposta dovrei avere che fai..... invece ho sempre la risposta notepad

Abbiate pazienza Grazie in anticipo

la soluzione è semplicissima... leva dalle palle quell'inutile guictrlread! l'inputbox non ne ha bisogno! deci semplicemente fare "switch $box"

sei come sempre illuminante XD

per così poco... non sono neanche lontanamente al livello di blacklight e altri...

e di me...

sono #incluso in questi altri?(bè se è incluso dark...)

altra domandima i comandi per copiare, incollare, e tagliare???
mi verrebbe comodo pure il codice per cambiare font
avevo pensato così

Codice:

$prova = InputBox ("font", "font") Switch $prova case "1" GUICtrlSetFont (2, 400, 4, $testo) endswitch

ovviamente vanno altre opzioni
ma avevo pensato male
poiche non funge