Hola a todos, lo que boy a preguntar es algo muy básico, pero nada no
hay forma de conseguirlo. Tabien quiero mencionar que antes de
preguntar nada he mirado en los grupos de google para buscar mensajes
anteriores y en un libro q tengo, pero no he encontrado la solución.

Mi primer gran problema es que estoy haciendo un programa con una
ventana madre y varias hijas, en el form4 que es un memo he insertado
un procedure para guaradar el texto que se escribe en el desde la
ventana madre pero no lo consigo ejecutar desde la madre. El código es
el siguiente:

procedure guardartexto;
begin
form4.texto.Setfocus;
try
form4.texto.Lines.SavetoFile('g:\textoaguardar.txt ');
Except On Exception Do
Showmessage('No se puede grabar archivo');
End;
form4.texto.Setfocus;
end;

Luego otra duda, que tan bien esta relacionada con la anterior, no se
como llamar a una función o a un procedimiento desde otro form
diferente, ya que a mí me gustaría cerrar desde la ventana madre el
from4 una ved terminado y no hay manera. Para cerrar manualmente
utilizo esto:

procedure TForm4.cerrar(Sender: TObject; var Action: TCloseAction);
begin
Action := caFree;
end;

Respecto a la primera pregunta si hago lo de abrir y cerrar ficheros
desde un proyecto nuevo con un solo form si consigo abrir y cerrar
ficheros de texto.

Bueno, gracias por vuestra atención.

Hola...

Me temo que deberías comprarte un libro mejor que el que tienes.
Son dudas relacionadas con lenguaje de programación, no con Delphi.
En mi opinión, estás reinventando la rueda.

Para cerrar un Form desde otro Form, sólo tienes que llamar a "form4.close"
desde cualquie form.

Para llamar desde Form1, a una función o procedimiento que está declarado en
Form4, o bien creas ese procedure en el Form1 o bien haces un
"Form4.nombre_del_procedure", eso sí, debes declarar el procedure en la
parte "interface" del Form4, para que sea "visible" y accesible desde los
demás forms.

En cualquier caso, intenta explicarnos mejor a qué te refieres con "no lo
consigo ejecutar", ya que puede ser que te de un error o que no te deje
compilar.

un saludo


"Paco Oca" <zafio***latinmail.com> escribió en el mensaje
news:7ca16e53.0404250218.64e70306***posting.google.c om...
> Hola a todos, lo que boy a preguntar es algo muy básico, pero nada no
> hay forma de conseguirlo. Tabien quiero mencionar que antes de
> preguntar nada he mirado en los grupos de google para buscar mensajes
> anteriores y en un libro q tengo, pero no he encontrado la solución.
>
> Mi primer gran problema es que estoy haciendo un programa con una
> ventana madre y varias hijas, en el form4 que es un memo he insertado
> un procedure para guaradar el texto que se escribe en el desde la
> ventana madre pero no lo consigo ejecutar desde la madre. El código es
> el siguiente:
>
> procedure guardartexto;
> begin
> form4.texto.Setfocus;
> try
> form4.texto.Lines.SavetoFile('g:\textoaguardar.txt ');
> Except On Exception Do
> Showmessage('No se puede grabar archivo');
> End;
> form4.texto.Setfocus;
> end;
>
> Luego otra duda, que tan bien esta relacionada con la anterior, no se
> como llamar a una función o a un procedimiento desde otro form
> diferente, ya que a mí me gustaría cerrar desde la ventana madre el
> from4 una ved terminado y no hay manera. Para cerrar manualmente
> utilizo esto:
>
> procedure TForm4.cerrar(Sender: TObject; var Action: TCloseAction);
> begin
> Action := caFree;
> end;
>
> Respecto a la primera pregunta si hago lo de abrir y cerrar ficheros
> desde un proyecto nuevo con un solo form si consigo abrir y cerrar
> ficheros de texto.
>
> Bueno, gracias por vuestra atención.

Hola...

Me temo que deberías comprarte un libro mejor que el que tienes.
Son dudas relacionadas con lenguaje de programación, no con Delphi.
En mi opinión, estás reinventando la rueda.

Para cerrar un Form desde otro Form, sólo tienes que llamar a "form4.close"
desde cualquie form.

Para llamar desde Form1, a una función o procedimiento que está declarado en
Form4, o bien creas ese procedure en el Form1 o bien haces un
"Form4.nombre_del_procedure", eso sí, debes declarar el procedure en la
parte "interface" del Form4, para que sea "visible" y accesible desde los
demás forms.

En cualquier caso, intenta explicarnos mejor a qué te refieres con "no lo
consigo ejecutar", ya que puede ser que te de un error o que no te deje
compilar.

un saludo


"Paco Oca" <zafio***latinmail.com> escribió en el mensaje
news:7ca16e53.0404250218.64e70306***posting.google.c om...
> Hola a todos, lo que boy a preguntar es algo muy básico, pero nada no
> hay forma de conseguirlo. Tabien quiero mencionar que antes de
> preguntar nada he mirado en los grupos de google para buscar mensajes
> anteriores y en un libro q tengo, pero no he encontrado la solución.
>
> Mi primer gran problema es que estoy haciendo un programa con una
> ventana madre y varias hijas, en el form4 que es un memo he insertado
> un procedure para guaradar el texto que se escribe en el desde la
> ventana madre pero no lo consigo ejecutar desde la madre. El código es
> el siguiente:
>
> procedure guardartexto;
> begin
> form4.texto.Setfocus;
> try
> form4.texto.Lines.SavetoFile('g:\textoaguardar.txt ');
> Except On Exception Do
> Showmessage('No se puede grabar archivo');
> End;
> form4.texto.Setfocus;
> end;
>
> Luego otra duda, que tan bien esta relacionada con la anterior, no se
> como llamar a una función o a un procedimiento desde otro form
> diferente, ya que a mí me gustaría cerrar desde la ventana madre el
> from4 una ved terminado y no hay manera. Para cerrar manualmente
> utilizo esto:
>
> procedure TForm4.cerrar(Sender: TObject; var Action: TCloseAction);
> begin
> Action := caFree;
> end;
>
> Respecto a la primera pregunta si hago lo de abrir y cerrar ficheros
> desde un proyecto nuevo con un solo form si consigo abrir y cerrar
> ficheros de texto.
>
> Bueno, gracias por vuestra atención.

Hola...

Me temo que deberías comprarte un libro mejor que el que tienes.
Son dudas relacionadas con lenguaje de programación, no con Delphi.
En mi opinión, estás reinventando la rueda.

Para cerrar un Form desde otro Form, sólo tienes que llamar a "form4.close"
desde cualquie form.

Para llamar desde Form1, a una función o procedimiento que está declarado en
Form4, o bien creas ese procedure en el Form1 o bien haces un
"Form4.nombre_del_procedure", eso sí, debes declarar el procedure en la
parte "interface" del Form4, para que sea "visible" y accesible desde los
demás forms.

En cualquier caso, intenta explicarnos mejor a qué te refieres con "no lo
consigo ejecutar", ya que puede ser que te de un error o que no te deje
compilar.

un saludo


"Paco Oca" <zafio***latinmail.com> escribió en el mensaje
news:7ca16e53.0404250218.64e70306***posting.google.c om...
> Hola a todos, lo que boy a preguntar es algo muy básico, pero nada no
> hay forma de conseguirlo. Tabien quiero mencionar que antes de
> preguntar nada he mirado en los grupos de google para buscar mensajes
> anteriores y en un libro q tengo, pero no he encontrado la solución.
>
> Mi primer gran problema es que estoy haciendo un programa con una
> ventana madre y varias hijas, en el form4 que es un memo he insertado
> un procedure para guaradar el texto que se escribe en el desde la
> ventana madre pero no lo consigo ejecutar desde la madre. El código es
> el siguiente:
>
> procedure guardartexto;
> begin
> form4.texto.Setfocus;
> try
> form4.texto.Lines.SavetoFile('g:\textoaguardar.txt ');
> Except On Exception Do
> Showmessage('No se puede grabar archivo');
> End;
> form4.texto.Setfocus;
> end;
>
> Luego otra duda, que tan bien esta relacionada con la anterior, no se
> como llamar a una función o a un procedimiento desde otro form
> diferente, ya que a mí me gustaría cerrar desde la ventana madre el
> from4 una ved terminado y no hay manera. Para cerrar manualmente
> utilizo esto:
>
> procedure TForm4.cerrar(Sender: TObject; var Action: TCloseAction);
> begin
> Action := caFree;
> end;
>
> Respecto a la primera pregunta si hago lo de abrir y cerrar ficheros
> desde un proyecto nuevo con un solo form si consigo abrir y cerrar
> ficheros de texto.
>
> Bueno, gracias por vuestra atención.

Hola...

Me temo que deberías comprarte un libro mejor que el que tienes.
Son dudas relacionadas con lenguaje de programación, no con Delphi.
En mi opinión, estás reinventando la rueda.

Para cerrar un Form desde otro Form, sólo tienes que llamar a "form4.close"
desde cualquie form.

Para llamar desde Form1, a una función o procedimiento que está declarado en
Form4, o bien creas ese procedure en el Form1 o bien haces un
"Form4.nombre_del_procedure", eso sí, debes declarar el procedure en la
parte "interface" del Form4, para que sea "visible" y accesible desde los
demás forms.

En cualquier caso, intenta explicarnos mejor a qué te refieres con "no lo
consigo ejecutar", ya que puede ser que te de un error o que no te deje
compilar.

un saludo


"Paco Oca" <zafio***latinmail.com> escribió en el mensaje
news:7ca16e53.0404250218.64e70306***posting.google.c om...
> Hola a todos, lo que boy a preguntar es algo muy básico, pero nada no
> hay forma de conseguirlo. Tabien quiero mencionar que antes de
> preguntar nada he mirado en los grupos de google para buscar mensajes
> anteriores y en un libro q tengo, pero no he encontrado la solución.
>
> Mi primer gran problema es que estoy haciendo un programa con una
> ventana madre y varias hijas, en el form4 que es un memo he insertado
> un procedure para guaradar el texto que se escribe en el desde la
> ventana madre pero no lo consigo ejecutar desde la madre. El código es
> el siguiente:
>
> procedure guardartexto;
> begin
> form4.texto.Setfocus;
> try
> form4.texto.Lines.SavetoFile('g:\textoaguardar.txt ');
> Except On Exception Do
> Showmessage('No se puede grabar archivo');
> End;
> form4.texto.Setfocus;
> end;
>
> Luego otra duda, que tan bien esta relacionada con la anterior, no se
> como llamar a una función o a un procedimiento desde otro form
> diferente, ya que a mí me gustaría cerrar desde la ventana madre el
> from4 una ved terminado y no hay manera. Para cerrar manualmente
> utilizo esto:
>
> procedure TForm4.cerrar(Sender: TObject; var Action: TCloseAction);
> begin
> Action := caFree;
> end;
>
> Respecto a la primera pregunta si hago lo de abrir y cerrar ficheros
> desde un proyecto nuevo con un solo form si consigo abrir y cerrar
> ficheros de texto.
>
> Bueno, gracias por vuestra atención.

Hola...

Me temo que deberías comprarte un libro mejor que el que tienes.
Son dudas relacionadas con lenguaje de programación, no con Delphi.
En mi opinión, estás reinventando la rueda.

Para cerrar un Form desde otro Form, sólo tienes que llamar a "form4.close"
desde cualquie form.

Para llamar desde Form1, a una función o procedimiento que está declarado en
Form4, o bien creas ese procedure en el Form1 o bien haces un
"Form4.nombre_del_procedure", eso sí, debes declarar el procedure en la
parte "interface" del Form4, para que sea "visible" y accesible desde los
demás forms.

En cualquier caso, intenta explicarnos mejor a qué te refieres con "no lo
consigo ejecutar", ya que puede ser que te de un error o que no te deje
compilar.

un saludo


"Paco Oca" <zafio***latinmail.com> escribió en el mensaje
news:7ca16e53.0404250218.64e70306***posting.google.c om...
> Hola a todos, lo que boy a preguntar es algo muy básico, pero nada no
> hay forma de conseguirlo. Tabien quiero mencionar que antes de
> preguntar nada he mirado en los grupos de google para buscar mensajes
> anteriores y en un libro q tengo, pero no he encontrado la solución.
>
> Mi primer gran problema es que estoy haciendo un programa con una
> ventana madre y varias hijas, en el form4 que es un memo he insertado
> un procedure para guaradar el texto que se escribe en el desde la
> ventana madre pero no lo consigo ejecutar desde la madre. El código es
> el siguiente:
>
> procedure guardartexto;
> begin
> form4.texto.Setfocus;
> try
> form4.texto.Lines.SavetoFile('g:\textoaguardar.txt ');
> Except On Exception Do
> Showmessage('No se puede grabar archivo');
> End;
> form4.texto.Setfocus;
> end;
>
> Luego otra duda, que tan bien esta relacionada con la anterior, no se
> como llamar a una función o a un procedimiento desde otro form
> diferente, ya que a mí me gustaría cerrar desde la ventana madre el
> from4 una ved terminado y no hay manera. Para cerrar manualmente
> utilizo esto:
>
> procedure TForm4.cerrar(Sender: TObject; var Action: TCloseAction);
> begin
> Action := caFree;
> end;
>
> Respecto a la primera pregunta si hago lo de abrir y cerrar ficheros
> desde un proyecto nuevo con un solo form si consigo abrir y cerrar
> ficheros de texto.
>
> Bueno, gracias por vuestra atención.

Hola...

Me temo que deberías comprarte un libro mejor que el que tienes.
Son dudas relacionadas con lenguaje de programación, no con Delphi.
En mi opinión, estás reinventando la rueda.

Para cerrar un Form desde otro Form, sólo tienes que llamar a "form4.close"
desde cualquie form.

Para llamar desde Form1, a una función o procedimiento que está declarado en
Form4, o bien creas ese procedure en el Form1 o bien haces un
"Form4.nombre_del_procedure", eso sí, debes declarar el procedure en la
parte "interface" del Form4, para que sea "visible" y accesible desde los
demás forms.

En cualquier caso, intenta explicarnos mejor a qué te refieres con "no lo
consigo ejecutar", ya que puede ser que te de un error o que no te deje
compilar.

un saludo


"Paco Oca" <zafio***latinmail.com> escribió en el mensaje
news:7ca16e53.0404250218.64e70306***posting.google.c om...
> Hola a todos, lo que boy a preguntar es algo muy básico, pero nada no
> hay forma de conseguirlo. Tabien quiero mencionar que antes de
> preguntar nada he mirado en los grupos de google para buscar mensajes
> anteriores y en un libro q tengo, pero no he encontrado la solución.
>
> Mi primer gran problema es que estoy haciendo un programa con una
> ventana madre y varias hijas, en el form4 que es un memo he insertado
> un procedure para guaradar el texto que se escribe en el desde la
> ventana madre pero no lo consigo ejecutar desde la madre. El código es
> el siguiente:
>
> procedure guardartexto;
> begin
> form4.texto.Setfocus;
> try
> form4.texto.Lines.SavetoFile('g:\textoaguardar.txt ');
> Except On Exception Do
> Showmessage('No se puede grabar archivo');
> End;
> form4.texto.Setfocus;
> end;
>
> Luego otra duda, que tan bien esta relacionada con la anterior, no se
> como llamar a una función o a un procedimiento desde otro form
> diferente, ya que a mí me gustaría cerrar desde la ventana madre el
> from4 una ved terminado y no hay manera. Para cerrar manualmente
> utilizo esto:
>
> procedure TForm4.cerrar(Sender: TObject; var Action: TCloseAction);
> begin
> Action := caFree;
> end;
>
> Respecto a la primera pregunta si hago lo de abrir y cerrar ficheros
> desde un proyecto nuevo con un solo form si consigo abrir y cerrar
> ficheros de texto.
>
> Bueno, gracias por vuestra atención.

Si, supongo queme has entendido bien. Si el libro q tengo es bastante
malo... Pues segun me has comentado, yo lo hacia igual pero me daba un
error q todabia me sigue dando. Con el error ese me compila pero es en
el momento que pulso cierto boton que llama a un porcedure q esta en
form4, o cuando intento hacer el "form4.close" desde "form1".

Esto es lo q me sale:
Project pajaros.exe raised exceptión class EAccessViolation With
message 'Access violation at address 0043f351 in module 'pajaros.exe'.
Read address 000002cc'. Proccess stoped. Use or Run to continue.

Y en la ventana de abajo donde te especifica el error que es pone algo
asi como:
[warning]madre.pas(94): Variable 'extensiónOK' not have been
iniatialized.

Pues no se lo que hacer, pq si no consigo abanzar de este punto, no
puedo seguir con el programa. Y tiene que ser una tonteria, pero no
hay manera.
Bueno, gracias.

"Santy Concepción" <SANTYCG*NO_SPAM****terra.es> wrote in message news:<fARic.4705099$uj6.16136714***telenews.teleline .es>...
> Hola...
>
> Me temo que deberías comprarte un libro mejor que el que tienes.
> Son dudas relacionadas con lenguaje de programación, no con Delphi.
> En mi opinión, estás reinventando la rueda.
>
> Para cerrar un Form desde otro Form, sólo tienes que llamar a "form4.close"
> desde cualquie form.
>
> Para llamar desde Form1, a una función o procedimiento que está declarado en
> Form4, o bien creas ese procedure en el Form1 o bien haces un
> "Form4.nombre_del_procedure", eso sí, debes declarar el procedure en la
> parte "interface" del Form4, para que sea "visible" y accesible desde los
> demás forms.
>
> En cualquier caso, intenta explicarnos mejor a qué te refieres con "no lo
> consigo ejecutar", ya que puede ser que te de un error o que no te deje
> compilar.
>
> un saludo
>

Si, supongo queme has entendido bien. Si el libro q tengo es bastante
malo... Pues segun me has comentado, yo lo hacia igual pero me daba un
error q todabia me sigue dando. Con el error ese me compila pero es en
el momento que pulso cierto boton que llama a un porcedure q esta en
form4, o cuando intento hacer el "form4.close" desde "form1".

Esto es lo q me sale:
Project pajaros.exe raised exceptión class EAccessViolation With
message 'Access violation at address 0043f351 in module 'pajaros.exe'.
Read address 000002cc'. Proccess stoped. Use or Run to continue.

Y en la ventana de abajo donde te especifica el error que es pone algo
asi como:
[warning]madre.pas(94): Variable 'extensiónOK' not have been
iniatialized.

Pues no se lo que hacer, pq si no consigo abanzar de este punto, no
puedo seguir con el programa. Y tiene que ser una tonteria, pero no
hay manera.
Bueno, gracias.

"Santy Concepción" <SANTYCG*NO_SPAM****terra.es> wrote in message news:<fARic.4705099$uj6.16136714***telenews.teleline .es>...
> Hola...
>
> Me temo que deberías comprarte un libro mejor que el que tienes.
> Son dudas relacionadas con lenguaje de programación, no con Delphi.
> En mi opinión, estás reinventando la rueda.
>
> Para cerrar un Form desde otro Form, sólo tienes que llamar a "form4.close"
> desde cualquie form.
>
> Para llamar desde Form1, a una función o procedimiento que está declarado en
> Form4, o bien creas ese procedure en el Form1 o bien haces un
> "Form4.nombre_del_procedure", eso sí, debes declarar el procedure en la
> parte "interface" del Form4, para que sea "visible" y accesible desde los
> demás forms.
>
> En cualquier caso, intenta explicarnos mejor a qué te refieres con "no lo
> consigo ejecutar", ya que puede ser que te de un error o que no te deje
> compilar.
>
> un saludo
>

Si, supongo queme has entendido bien. Si el libro q tengo es bastante
malo... Pues segun me has comentado, yo lo hacia igual pero me daba un
error q todabia me sigue dando. Con el error ese me compila pero es en
el momento que pulso cierto boton que llama a un porcedure q esta en
form4, o cuando intento hacer el "form4.close" desde "form1".

Esto es lo q me sale:
Project pajaros.exe raised exceptión class EAccessViolation With
message 'Access violation at address 0043f351 in module 'pajaros.exe'.
Read address 000002cc'. Proccess stoped. Use or Run to continue.

Y en la ventana de abajo donde te especifica el error que es pone algo
asi como:
[warning]madre.pas(94): Variable 'extensiónOK' not have been
iniatialized.

Pues no se lo que hacer, pq si no consigo abanzar de este punto, no
puedo seguir con el programa. Y tiene que ser una tonteria, pero no
hay manera.
Bueno, gracias.

"Santy Concepción" <SANTYCG*NO_SPAM****terra.es> wrote in message news:<fARic.4705099$uj6.16136714***telenews.teleline .es>...
> Hola...
>
> Me temo que deberías comprarte un libro mejor que el que tienes.
> Son dudas relacionadas con lenguaje de programación, no con Delphi.
> En mi opinión, estás reinventando la rueda.
>
> Para cerrar un Form desde otro Form, sólo tienes que llamar a "form4.close"
> desde cualquie form.
>
> Para llamar desde Form1, a una función o procedimiento que está declarado en
> Form4, o bien creas ese procedure en el Form1 o bien haces un
> "Form4.nombre_del_procedure", eso sí, debes declarar el procedure en la
> parte "interface" del Form4, para que sea "visible" y accesible desde los
> demás forms.
>
> En cualquier caso, intenta explicarnos mejor a qué te refieres con "no lo
> consigo ejecutar", ya que puede ser que te de un error o que no te deje
> compilar.
>
> un saludo
>