#include<guiconstants.au3>
GUICreate ("memo",400,400)
GUISetState (@sw_show)
GUICtrlCreatePic( "34543", 0, 0,400,400)
GuiCtrlSetState(-1,$GUI_DISABLE)
$input=GUICtrlCreateInput ("memo",100,100,200,200)
$bottone=GUICtrlCreateButton ("salva",300,300)
$bottone2=GUICtrlCreateButton ("esci",150,300)
$bottone3=GUICtrlCreateButton ("carica",200,300)
$bottone4=GUICtrlCreateButton ("info",250,300)
$bottone5=GUICtrlCreateButton ("sito",280,300)
While 1=1
switch GUIGetMsg ()
Case $gui_event_close
Exit
Case $bottone
$leggo=guictrlread($input)
FileWrite ("memo.txt",""& $leggo)
Case $bottone2
GUISetState (@sw_hide)
Case $bottone3
MsgBox(0,"memorizazione","la mini memorizazione eletronica")
ShellExecute ("memo.txt")
Case $bottone4
MsgBox(0,"Informazione","Autore: harry dinner1"& @CRLF &""& @CRLF &"la mini aggenda eletronica serve per nn scordare"& @CRLF &"in particolare quelli con la memoria corta"& @CRLF &""& @CRLF &"Istruziozioni,la voce SALVA serve per salvare i vostri appunti tipo un gui o un sito,la voce ESCI serve per chiudere il programma,la voce CARICA serve per caricare i tuoi dati,la voce INFO serve per sapere tutto cio, la voce SITI ti porta in un sito [URL=http://01184601.forumfree.net]http://01184601.forumfree.net[/URL] fine buon divertimento a sparare cazzate by harry dinner1")
Case $bottone5
#Include <process.au3>
$sito = 'http://01184601.forumfree.net'
_RunDos ('Start '&$sito)
EndSwitch
WEnd
GuiSetBkColor("0xFF0000");Rosso
