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.