FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
||||
|
||||
Cómo se declara y usa el tipo "Enumeration" en Delphi
Buenas foreros
Estoy buscando como definir tipos de datos ENUM en Delphi Un ejemplo en C Código:
enum FILETYPE_E {FILE_PRG = 0,FILE_TAB,FILE_PAN, FILE_SYM,}; Código:
Public Enum FILETYPE_E FILE_PRG = 0 FILE_TAB FILE_PAN FILE_SYM End Enum If resul <> FILETYPE_E.FILE_PAN Then ……. Gracias de antemano
__________________
Disfruta de la vida ahora, vas a estar muerto mucho tiempo. Última edición por dec fecha: 21-11-2018 a las 14:34:20. Razón: Poner etiquetas CODE |
#2
|
||||
|
||||
Hola a todos,
Puede revisar este artículo de Delphi Basics y también este apartado de la documentación de Embarcadero Delphi. Este sería un ejemplo con varios "tipos enumerados":
Arriba "TSound", "TMyColor", "Answer", son "enumeraciones". Así podría usarse una de ellas, por ejemplo:
|
#3
|
||||
|
||||
Enumerations in Delphi
En Delphi Basics: Enumerations, SubRanges and Sets Edito: O lees lo que DEC ya te comentó
__________________
Buena caza y buen remar... http://mivaler.blogspot.com |
#4
|
||||
|
||||
Cita:
Pero no... no puede conformarse con lo que dec comentó... En efecto, se ve cómo declarar (pero no completamente) un tipo "enumeración", y, se ve cómo se puede asignar un determinado valor a una variable de dicho tipo, empero, hay más cosas por aprender, como posibles funciones útiles para los tipos "enumeración", etc. |
#5
|
||||
|
||||
Gracias chicos, rápidos y concretos, defino....
la función a usar es esta (definida por mi para acceder a la librería) function OpenNET(name: string; var hPort: integer): FILETYPE_E; cdecl; stdcall; external 'NetCom.dll'; _ y el código Un saludo
__________________
Disfruta de la vida ahora, vas a estar muerto mucho tiempo. Última edición por ecfisa fecha: 21-11-2018 a las 17:11:29. Razón: Agregar etiquetas [DELPHI] [/DELPHI] |
#6
|
||||
|
||||
Holaaa, se puede pasar?
Siguiendo con la conversión y vuestra estimable ayuda....para convertir una definición de funcion Basic Código:
Public Declare Function ReadVar Lib "NETCOM" (ByVal hPort As Integer, ByVal variable As String, ByVal value As String) As Integer Código PHP:
No me da error, pero no me llega la variable, supongo que hay lio entre CHAR* y STRING Una ayudita please PD: hace tiempo que quiero "regalar" a la comunidad una utilidad (Delphi) para hacer PING a multiples destinos con thread, vamos, para hacer "un analizador de red", pero solose "pegar" código, si me echais otra mano os la paso, va muy bien y la uso mucho. Gracias de antemano
__________________
Disfruta de la vida ahora, vas a estar muerto mucho tiempo. Última edición por ecfisa fecha: 21-11-2018 a las 17:12:19. Razón: Agregar etiquetas al código |
#7
|
|||
|
|||
A ver intenta de esta manera...
Saludos cordiales |
#8
|
||||
|
||||
Hola.
Un buen equivalente en Delphi a char * de C, es PChar. Por favor no te olvides de usar etiquetas cuando incluyas código en tus mensajes: (ya las agregué en tus mensajes) Saludos
__________________
Daniel Didriksen Guía de estilo - Uso de las etiquetas - La otra guía de estilo .... |
#9
|
||||
|
||||
Gracias
Ya he probado, sigo igual pero quizá sea otro problema de la librería, voy a investigar
__________________
Disfruta de la vida ahora, vas a estar muerto mucho tiempo. |
#10
|
||||
|
||||
Buenas foreros
Tema resuelto para que la librería me devuelva el valor, ella lo define internamente como Código:
"char value[30];"
y para usarlo
Gracias por vuestra colaboracion
__________________
Disfruta de la vida ahora, vas a estar muerto mucho tiempo. |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
¿como hacer tunneling con delphi tipo zebedee? | JXJ | Varios | 5 | 08-05-2012 18:44:02 |
¿Como se declara correctamente un constructor? | flystar | OOP | 4 | 20-04-2010 20:12:37 |
¡El Profesor Fungus me declara la guerra! | Ñuño Martínez | La Taberna | 11 | 09-07-2008 19:37:29 |
como puedo cambiar la fuente de Delphi - tipo de letra | micky mouse | Varios | 6 | 07-03-2008 02:26:12 |
Microsoft declara que Vista tiene problemas muy serios | Casimiro Notevi | Noticias | 16 | 30-01-2007 09:44:12 |
|