FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
|
#1
|
||||
|
||||
Necistar importar la Unit Dialogs para mas informacion revisa el enlace
http://www.delphibasics.co.uk/RTL.as...dCode1=Yes#Ex1
|
#2
|
|||
|
|||
Mil gracias amigo...lo acabo de probar y funciona
Saludos |
#3
|
|||
|
|||
Cambiando un poco ahora el showmessage por una Imagen en el Form1.
Necesito que el Form1 al arrancar me muestre en un rectangulo y la funcion que lo hace esta en la Unit2 Algo asi, unit Forma1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, StdCtrls; type Forma1 = class(TForm) Image1: TImage; Button1: TButton; Button2: TButton; procedure FormCreate(Sender: TObject); private { Private declarations } public { Public declarations } end; var Forma1: TForma1; implementation uses Unit2; {$R *.dfm} procedure TForma1.FormCreate(Sender: TObject); begin Rueda; end; end. ////--------------------------------------------- Unit Forma2; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, Math, StdCtrls, Buttons; procedure rueda; implementation procedure rueda; begin with TForma1.Image1.Canvas do begin Pen.Color := clNavy; Pen.Width := 5; Brush.Color := clYellow; Brush.Style := bsDiagCross; Ellipse( 160, 10, 260, 110 ); end; end; end. Solo cambie el showmessage pero no genera la rueda,,,sigue el mismo error de Undefined identifier |
#4
|
||||
|
||||
1:
Bienvenido a clubdelphi, como siempre aconsejamos a los nuevos, no olvides leer nuestra guía de estilo, gracias por tu colaboración 2: Recuerda poner los tags al código fuente, ejemplo: Gracias 3: No olvides poner títulos descriptivos a tus preguntas, "Nuevo en Delphi" no es un título que describa el problema que quieres resolver. Gracias. |
#5
|
||||
|
||||
Hola te aconsejo que cuando tengas dudas diferentes no dudes en abrir otro hilo ya que se mantiene el orden.
Bueno con respecto a tu duda, una forma simple de hacerlo es pasarle la referencia del objeto TImage por parametro a la funcion Rueda
Ya habiendole especificado el parametro hay que llamar a la funcion desdel el formulario principal
La palabra Self hace referencia al formulario Forma1 pero si te confunde este concepto puede hacer esto
Edito: Tambien simplemente basta con poner
En mi caso mi formulario se llama Form1, por ultimo evitar usar WITH. ScreenShot Saludos.... Última edición por BDWONG fecha: 31-10-2016 a las 02:09:11. |
#6
|
|||
|
|||
Muchisimas gracias.
Logro funcionar |
#7
|
||||
|
||||
Recuerda que puedes obtener una licencia starter en la cual puedes instalar componentes de terceros
https://www.embarcadero.com/products...ional-download
__________________
Buena caza y buen remar... http://mivaler.blogspot.com |
#8
|
|||
|
|||
GRacias,
Y cuales son las limitaciones con esa version ? Yo tengo Delphi 6 EE y con esa estoy comenzando a trabajar |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
nuevo en delphi | Kastore | Varios | 5 | 09-10-2010 00:12:05 |
Nuevo en el club, nuevo en el trabajo, nuevo en la vida | winzo | La Taberna | 26 | 29-04-2008 19:13:52 |
Nuevo con Delphi | jose6106 | Varios | 2 | 03-01-2008 15:57:35 |
Nuevo update para delphi 2007 / delphi .net | avmm2004 | Noticias | 0 | 18-12-2007 20:19:25 |
Lo nuevo en delphi 6 | frankmch | Noticias | 5 | 11-09-2003 17:04:42 |
|