[Error] Missing operator or semicolon delphi

[wolfran_hack]

estoy buscando alguna forma de tener un MensajeBox temporal, esto quiere decir que se muestre por X segundos y luego se cierre sin intervención del usuario, esto es posible? estuve mirando el MensajeBox en si no posee esta propiedad. O me recomiendan hacerlo con un Formulario?

[ecfisa]

Hola wolfran_hack.

Revisa en este hilo: enviar un mensaje y que se auto cierre

Saludos.

[wolfran_hack]

Estoy realizando un Log de errores contra un Memo1, por ejemplo:

Código Delphi [-]
Memo1.Lines.Add( formatdatetime('hh:nn:ss',now) + ' ; ' + 'Error: ' + Edit1.Text )

y me encuentro que al incluir esta linea por ejemplo en un IF:

Código Delphi [-]
  If Edit1.Text = '' then
     Memo1.Lines.Add( formatdatetime('hh:nn:ss',now) + ' ; ' + 'Error no se ingreso nada. ' )
     MessageBox(Handle,'Error no se ingreso nada.    ', 'BioStudio SMS', MB_ICONSTOP)
    else

me lanza este error:

[Error] Missing operator or semicolon delphi?

[[Al González]]

Recuerda que en Delphi debe utilizarse el símbolo de punta y coma (";") para separar sentencias. Por otra parte, los estatutos de control If, While y For necesitan llevar Begin y End cuando contienen varias sentencias.

Código Delphi [-]
  If Edit1.Text = '' Then
  Begin
     Memo1.Lines.Add (FormatDateTime ('hh:nn:ss', Time) + ' ; ' + 'Error: no se ingresó nada.');
     MessageBox (Handle, 'Error: no se ingresó nada.', 'BioStudio SMS', mb_IconStop);
  End
  Else

Nota: semicolon en inglés es punto y coma.

---------------

Por cierto, permitiéndome un paréntesis un poco fuera de tema, al ver la primera sentencia de ese If, pensé que usando GHF quedaría un poco más corta:

Código Delphi [-]
Memo1.Lines.Add (ghISOTime (Time) + ' ; ' + 'Error: no se ingresó nada.');

Pero ahora me surgió la inquietud de permitir que el parámetro de ghISOTime sea opcional (usando en ese caso la hora actual), con lo que se acortaría un poco más:

Código Delphi [-]
Memo1.Lines.Add (ghISOTime + ' ; ' + 'Error: no se ingresó nada.');

Creo que será algo para agregar al repertorio.

Saludos.