Hola...
Te recuerdo de nuevo las etiquetas
delphi: (sin espacios en blanco) para publicar tu código...
Ejemplo de su uso:
Código:
[delphi]
begin
// código
end;
[/delphi]
Ahora, cuando especifiques que te da un error, favor de indicar cual es este, ya que con decir, "me da un error" no logramos nada...
Saludos...