PDA

Ver la Versión Completa : Duplicar form


Delar
04-12-2006, 22:02:39
Hola buenas, necesito algo para poder duplicar un form con todos sus componentes y procedures. Podria hacerlo manualmente, pero me ocuparia demasiado tiempo. Así que si hay alguna manera... se agradeceria.

PD: Lo quiero en tiempo de ejecución, sin haberlo creado antes, y uso Delphi 7 Personal.

Muchas gracias, Delar

roman
04-12-2006, 22:30:57
No entiendo, tú puedes crear tantas instancias de la clase del formulario como quieras:


Form1 := TMiForm.Create(...);
Form2 := TMiForm.Create(...);
Form3 := TMiForm.Create(...);


y todas tendrán las mismas componentes y métodos.

// Saludos

Delar
04-12-2006, 23:23:06
Muchas gracias eso funcionó, pero ahora necesito saber como ejecutar el contenido de un RichEdit.

Es decir, si el valor Text de RichEdit1 es:
'
procedure ClicarMe();
begin
Label1.Caption := 'Me clicaste!';
end;

Button1.OnClick := ClicarMe();
'

Clico en un boton, que me ejecuta ese contenido, y si clico en Button1, me canvia el valor de la label. Alguna solución?

Gracias por adelantado.

roman
04-12-2006, 23:29:24
Pues no, esto realmente no se puede hacer en Delphi. Delphi es un lenguaje compilado, lo que significa que todo debe estar convertido a lenguaje binario antes de ejecutarse, de manera que no puedes ejecutar código al vuelo, como sucede con un lenguaje interpretado como Visual Basic.

// Saludos

Delar
04-12-2006, 23:31:16
Yo he visto un programa (De Delphi 7) que en un editor de codigo ponias
execute_string('show_message("Hola")')
I te enviaba un mensaje diciendo hola. Me interesa saber como hacer el execute_string.

Gracias, Delar

roman
04-12-2006, 23:47:40
Posiblemente el programa que has visto esté usando un lenguaje de script tipo delphi. Por ejemplo, Pascal Script (http://www.remobjects.com/page.asp?id={9A30A672-62C8-4131-BA89-EEBBE7E302E6}) de RemObjects (http://www.remobjects.com/) consiste de una serie de componentes para Delphi que te permiten ejecutar código de object pascal.

// Saludos

Delar
04-12-2006, 23:54:51
Wow, no se si sera eso, pero eso tiene muy buena pinta.

Muchas gracias, Delar

roman
05-12-2006, 00:07:40
tiene muy buena pinta

Pues sí. Tan buena que es lo que Jordan Rusell ha usado para añadir capacidad de script a su de por sí potente instalador Inno Setup (http://www.jrsoftware.org/isinfo.php).

// Saludos

Delar
05-12-2006, 00:25:34
Pero no puedo instalarlo, instalo el SDK, luego el Pascal objects, i al entrar en Delphi no encuentra dbrtl70.bpl y algunas cosas mas.

Alguna solución?
Muchas gracias, Delar