una pregunta simple
Publicado: 09 Mar 2010, 03:25
Una pregunta, cuando lleno los campos de " URL de la imagen" y " Nombre de la imagen" , no me cambia en el plantillas.txt por lo que puse yo , supongamos que en "Nombre de la imagen", pongo" paisajes de armoles" ,en el .txt me aparece "Nombre de la imagen".
porque puede ser?
porque puede ser?
Código: Seleccionar todo
#include <File.au3>
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("FBlook.com.ar", 633, 276, 193, 125)
GUISetIcon("C:\Archivos de programa\Facebook Notifications\APNotifications.exe")
$pagina = GUICtrlCreateInput("URL de la imagen", 80, 56, 481, 21)
GUICtrlSetCursor (-1, 5)
$Button1 = GUICtrlCreateButton("Aceptar", 240, 152, 153, 57, 0)
GUICtrlSetCursor (-1, 0)
$Nombre = GUICtrlCreateInput("Nombre de la imagen", 208, 24, 225, 21)
GUICtrlSetCursor (-1, 5)
$Checkbox1 = GUICtrlCreateCheckbox("Izquierda", 136, 96, 73, 17)
$Checkbox2 = GUICtrlCreateCheckbox("Abajo", 224, 96, 81, 17)
$Checkbox3 = GUICtrlCreateCheckbox("Centro", 304, 96, 81, 17)
$Checkbox4 = GUICtrlCreateCheckbox("Arriba", 384, 96, 81, 17)
$Checkbox5 = GUICtrlCreateCheckbox("Derecha", 464, 96, 81, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$find = GUICtrlRead($Nombre)
$pag = GUICtrlRead($pagina)
$filename = "C:\Plantilla.txt"
$msg = @CRLF
$msg = "{background: transparent url(""" & $find & """) repeat-x scroll" & $pag & " !important;} " & @CRLF
FileWrite($filename, $msg )
exitloop
WEnd
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
(