FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
#1
|
|||
|
|||
Necesito ayuda
hOLA a todos!!
Tengo un problemilla con un método. Me da un error en el case of y no se porque. El código es el siguiente: procedure TTFormEnvConfig.SeleccionarDirectorio(Sender: TObject); var opcion: string; begin case (Sender as TComponent).Tag of 1: opcion:=DirTrabajo.text; 2: opcion:=DirTmp.text; 3: opcion:=DirIconos.text; 4: opcion:=DirConsola.text; 5: opcion:=DirInternet.text; 6: begin DirCompilador.InitialDir := rutaCompilador; if DirCompilador.Execute then editDirCompilador.Text := DirCompilador.FileName; end; end; end; El error me lo da donde está la linea roja...("Error:Original type required") Gracias de antemano a todos Un saludo |
#2
|
||||
|
||||
Creo que te faltan algunos paréntesis...
Última edición por duilioisola fecha: 27-01-2009 a las 11:30:19. |
#3
|
|||
|
|||
gracias de todas formas,
pero tampoco me funciona con los parentesis.... |
#4
|
||||
|
||||
Revisa las opciones de configuración del proyecto (sobre todo pestaña de compilación), porque a mi un código como este no me da error al compilar:
__________________
Germán Estévez => Web/Blog Guía de estilo, Guía alternativa Utiliza TAG's en tus mensajes. Contactar con el Clubdelphi P.D: Más tiempo dedicado a la pregunta=Mejores respuestas. |
#5
|
|||
|
|||
Muchas gracias, voy a seguir intentandolo!
|
#6
|
||||
|
||||
El error que te da es "Original type required" o es "Oridinal type required"?
Si es el segundo, la siguiente pregunta es si has modificado la propiedad TAG del objeto "Sender". Esta debe ser de un tipo ordinal (enteros, word, char). No puede ser un string, un float, un array. |
#7
|
|||
|
|||
ni un variant...me parece que hay alguna version de delphi que el tag es variant
|
#8
|
|||
|
|||
Es Ordinal!Tienes razón.
Entonces que debo hacer?? |
#9
|
||||
|
||||
Haz una prueba sencilla para salir de dudas...
var
A ver dónde marca el error ahora.
__________________
Germán Estévez => Web/Blog Guía de estilo, Guía alternativa Utiliza TAG's en tus mensajes. Contactar con el Clubdelphi P.D: Más tiempo dedicado a la pregunta=Mejores respuestas. |
#10
|
||||
|
||||
Cita:
Que, dicho sea de paso, para mí una mejor solución sería la teórica herencia insertada. ¿Sabes qué versiones son las que tienen a la propiedad Tag de tipo Variant? Saludos. Al. |
Herramientas | Buscar en Tema |
Desplegado | |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Necesito Ayuda | kary | Varios | 3 | 09-10-2008 22:31:44 |
Necesito ayuda | RoyTan | Conexión con bases de datos | 1 | 27-08-2006 06:23:15 |
Necesito Ayuda | poly | MySQL | 1 | 17-12-2005 16:11:59 |
Necesito ayuda en c++ | caferd5 | C++ Builder | 2 | 23-05-2005 07:35:13 |
Necesito de su ayuda ... | !3d1@n | Impresión | 3 | 24-01-2005 14:21:41 |
|