Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

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

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 18-10-2016
Johan123987 Johan123987 is offline
Registrado
NULL
 
Registrado: oct 2016
Posts: 2
Poder: 0
Johan123987 Va por buen camino
Unhappy Funciones a un boton

Hola Delphineros

Soy novato en esto de delphi, pero me agrada la plataforma.

Tengo un proyecto que me ayuden con un problema que tengo al añadirle mas funciones a un timer, por ejemplo este que tengo me detecta si una aplicación esta abierta o no, pero al momento de añadir mas cosas me sale error.
Agradezco su respuesta

Este es el código:

Código:
procedure TForm1.Timer2Timer(Sender: TObject);
begin
  if IsAppRunning('NombredelProceso.exe') then
    Edit1.Text:=('Proceso Inicado')
  else
    Edit1.Text:=('Esperando Proceso');
    GroupBox2.Enabled := False
end;

Lo que yo quiero hacer es añadir mas funciones debajo de: Edit1.Text:=('Proceso Inicado')
Como activar el GroupBox2.Enabled := True
Pero me da error!


sigo pendiente.
Responder Con Cita
  #2  
Antiguo 18-10-2016
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Poder: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
Para poner varias sentencias en un bloque, debes encerrarlas entre begin y end:

Código Delphi [-]
procedure TForm1.Timer2Timer(Sender: TObject);
begin
  if IsAppRunning('NombredelProceso.exe') then
  begin
    Edit1.Text:=('Proceso Inicado');
    { otras sentencias }
  end
  else
  begin
    Edit1.Text:=('Esperando Proceso');
    { otras sentencias }
  end;
end;

LineComment Saludos
Responder Con Cita
  #3  
Antiguo 19-10-2016
LIA_GUILLERMO LIA_GUILLERMO is offline
Miembro
 
Registrado: feb 2016
Posts: 32
Poder: 0
LIA_GUILLERMO Va por buen camino
Con el poco conocimiento que tengo, hasta donde yo se las sentencias que esten en un bloque deben ir entre Begin y End, excepto si solo hubiera una sola sentencia, no habria necesidad de el Begin y End, tal y como muestra el ejemplo de los expertos como roman. Saludos compañeros.
Responder Con Cita
  #4  
Antiguo 21-10-2016
Johan123987 Johan123987 is offline
Registrado
NULL
 
Registrado: oct 2016
Posts: 2
Poder: 0
Johan123987 Va por buen camino
Hola muchas gracias a los dos por contestar me ha sido de gran ayuda
Y otra cosa Roman puedes responder el mensaje que te enviado por favor
Gracias..
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

Temas Similares
Tema Autor Foro Respuestas Último mensaje
funciones con php jomanmoz Varios 3 13-03-2008 11:30:02
Funciones luiz_leo Firebird e Interbase 5 07-08-2007 20:48:20
Dll y funciones mar646 API de Windows 2 27-04-2005 17:45:40
Funciones de SQL DarkSide SQL 6 24-01-2005 17:00:02
Funciones Ras mauro Varios 0 17-07-2003 04:36:28


La franja horaria es GMT +2. Ahora son las 15:10:00.


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