Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > API de Windows
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 04-03-2005
Avatar de DB-ADO
DB-ADO DB-ADO is offline
Miembro
 
Registrado: mar 2005
Ubicación: Bs As Argentina
Posts: 39
Poder: 0
DB-ADO Va por buen camino
En Visual es algo como:
Function PruebaFuncion(Texto As String) As String
PruebaFuncion = Texto + " Mundo"
End FunctionEn delphi es asi:

Delclaras primero en public la funcion
Código:
Function PruebaFuncion(Texto :String) :String;
Y luego despues de implementation va lo siguiente

Código:
Function PruebaFuncion(Texto :String) :String;
 Begin
   Result := Texto + 'Mundo';
 end;
Despues por ejemplo llamas a la funcion en algun evento de algun objeto:

Código:
procedure TForm1.Button1Click(Sender: TObject);
  var
   Stringr : String;
begin
   PruebaFunction (Stringr);
end;
Y listo

***Regards***
__________________
-------- Pablo: --------
----- Programador -----
-------- Delphi ---------
Responder Con Cita
  #2  
Antiguo 04-03-2005
Isako Isako is offline
Registrado
 
Registrado: mar 2005
Posts: 4
Poder: 0
Isako Va por buen camino
Muchas gracias, hecho!!!
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 13:57:41.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi