Difference between revisions of "Howto Use TSaveDialog/es"
m (Fixed syntax highlighting) |
|||
(7 intermediate revisions by 3 users not shown) | |||
Line 1: | Line 1: | ||
{{Howto Use TSaveDialog}} | {{Howto Use TSaveDialog}} | ||
− | Como utilizar el diálogo TSaveDialog | + | Como utilizar el diálogo TSaveDialog |
[[Image:tsavedialog.png]] | [[Image:tsavedialog.png]] | ||
− | Guía simple: | + | Guía simple: |
− | 1. | + | 1. Colocar un componente ''TSaveDialog'' en tu formulario (en cualquier lugar del mismo, ya que en tiempo de ejecución no será visible). |
− | + | [[Image:Lazarus_Paleta_Dialogos.png]] | |
− | (Es el segundo elemento a la izquierda bajo [[Dialogs tab | | + | (Es el segundo elemento a la izquierda bajo [[Dialogs tab/es | Pestaña ''Dialogs'']]) |
− | 2. Añadir un memo en el formulario. | + | 2. Añadir un ''memo'' en el formulario. |
[[Image:tmemo.png]] | [[Image:tmemo.png]] | ||
− | 3. Añadir un | + | 3. Añadir un botón en el formulario. |
[[Image:tbutton.png]] | [[Image:tbutton.png]] | ||
− | El [[IDE_Window:_Object_Inspector|Object Inspector]] mostrará las propiedades del objeto Button1. | + | El [[IDE_Window:_Object_Inspector|Object Inspector]] mostrará las propiedades del objeto Button1. |
− | |||
− | |||
− | < | + | Cambia la propiedad llamada ''Caption'', del valor mostrado ('Button1') a 'Guardar', u otro que consideres apropiado. |
− | procedure TForm1. | + | |
+ | Haz clic en la pestaña '''Eventos''' del Inspector de Objetos. Selecciona el rectángulo situado a la derecha de ''OnClick'': aparece un pequeño cuadro con tres puntos (... elipsis). Haz clic en ella, automáticamente se abrirá el editor de código fuente y el cursor se ubicará en un trozo de código de comienzo, la plantilla del método de respuesta al evento. | ||
+ | |||
+ | Completa el código: | ||
+ | |||
+ | <syntaxhighlight lang=pascal> | ||
+ | procedure TForm1.GuardarClick( Sender: TObject ); | ||
begin | begin | ||
if SaveDialog1.Execute then | if SaveDialog1.Execute then | ||
Memo1.Lines.SaveToFile( SaveDialog1.Filename ); | Memo1.Lines.SaveToFile( SaveDialog1.Filename ); | ||
− | end; | + | end;</syntaxhighlight> |
− | </ | ||
− | El método [[doc:lcl/dialogs/tcommondialog.execute.html | Execute]] muestra el diálogo para salvar ficheros. Retorna [[True|true]] cuando el usuario selecciona un fichero, y [[False|false]] cuando el usuario | + | El método [[doc:lcl/dialogs/tcommondialog.execute.html | Execute]] muestra el diálogo para salvar ficheros. Retorna [[True|true]] cuando el usuario selecciona un fichero, y [[False|false]] cuando el usuario cancela la operación. |
− | La propiedad [[doc:lcl/dialogs/tfiledialog.filename.html | Filename]] retorna el nombre de fichero completo incluyendo la unidad y la | + | La propiedad [[doc:lcl/dialogs/tfiledialog.filename.html | Filename]] retorna el nombre de fichero completo incluyendo la unidad y la ruta. |
== Ver además == | == Ver además == | ||
− | * [[Howto Use TOpenDialog | Como utilizar el diálogo TOpenDialog]] | + | * [[Howto Use TOpenDialog/es | Como utilizar el diálogo TOpenDialog]] |
− | * [[Dialogs_tab| | + | * [[Dialogs_tab/es| Pestaña Diálogos]] |
− | * [[Standard_tab#TButton| | + | * [[Standard_tab/es#TButton| Pestaña Estandar#TButton]] |
− | * [[Standard_tab#TMemo| Solapa Estandar#TMemo]] | + | * [[Standard_tab/es#TMemo| Solapa Estandar#TMemo]] |
Latest revision as of 08:51, 17 February 2020
│
Deutsch (de) │
English (en) │
español (es) │
suomi (fi) │
français (fr) │
日本語 (ja) │
polski (pl) │
русский (ru) │
slovenčina (sk) │
Como utilizar el diálogo TSaveDialog
Guía simple:
1. Colocar un componente TSaveDialog en tu formulario (en cualquier lugar del mismo, ya que en tiempo de ejecución no será visible).
(Es el segundo elemento a la izquierda bajo Pestaña Dialogs)
2. Añadir un memo en el formulario.
3. Añadir un botón en el formulario.
El Object Inspector mostrará las propiedades del objeto Button1.
Cambia la propiedad llamada Caption, del valor mostrado ('Button1') a 'Guardar', u otro que consideres apropiado.
Haz clic en la pestaña Eventos del Inspector de Objetos. Selecciona el rectángulo situado a la derecha de OnClick: aparece un pequeño cuadro con tres puntos (... elipsis). Haz clic en ella, automáticamente se abrirá el editor de código fuente y el cursor se ubicará en un trozo de código de comienzo, la plantilla del método de respuesta al evento.
Completa el código:
procedure TForm1.GuardarClick( Sender: TObject );
begin
if SaveDialog1.Execute then
Memo1.Lines.SaveToFile( SaveDialog1.Filename );
end;
El método Execute muestra el diálogo para salvar ficheros. Retorna true cuando el usuario selecciona un fichero, y false cuando el usuario cancela la operación.
La propiedad Filename retorna el nombre de fichero completo incluyendo la unidad y la ruta.