Delphi - Macrosustitucion de código

   
Vista:

Macrosustitucion de código

Publicado por Juan (11 intervenciones) el 14/11/2011 17:42:30
Buenas tardes, vengo del lenguaje FoxPro y estoy pensando en pasarme a Delphi, lo que me gustaría saber es si en Delphi se puede hacer la macrosustitución, como por ejemplo:

Private Declare Function EbExecuteLine Lib "vba6.dll" (ByVal pStringToExec As Long, ByVal Foo1 As Long, ByVal Foo2 As Long, ByVal fCheckOnly As Long) As Long

Dim cadena As String
# Dim code As Long
#
# Private Sub Command1_Click()
# 'Hacemos un bucle for de 1 a 10 y mostramos el valor
# cadena = "For i = 0 to 10:msgbox " & Chr(34) & "valor de i: " & Chr(34) & "&i:next"
# code = EbExecuteLine(StrPtr(cadena), 0&, 0&, Abs(False)) = 0
# End Sub
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
información
Otras secciones de LWP con contenido de Delphi
- Código fuente de Delphi
- Cursos de Delphi
- Temas de Delphi
- Chat de Delphi
información
Códigos de Delphi
- GlassEffect
- Chat
- OpenGL