[Lazarus-es] Problemas al inciarme

[Maxi]

El 23/06/2013 00:35, "Bruno Luciani" <bruno.luciani en gmail.com> escribió:
>
> Hola Gente , me estoy inciando con Lazarus
>
> Y siguiendo un Tutorial que encontre en Internet
>
> Fui armando un ejemplo de conexion a una Base Postgresql
>
> EL problema me surge con un error
>
> Resulta que en un Form tengo Grid y un boton que refresca ese grid
>
> y en el tutorial dice de Crear una funcion refresh , reutilizable
>
> entonces declaro una procedure en Private
>
> y luego en el evento click del boton , llamo a esa funcion
>
>
> Me genera este error:
>
> editclientes.pas(22,15) Error: Forward declaration not solved
"TFCLientes.refreshclients;"
>
>
> Pego un poco de codigo.
>
> --------------------------------------------
>
> unit EditClientes;
>
> {$mode objfpc}{$H+}
>
> interface
>
> uses
>   Classes, SysUtils, pqconnection, sqldb, FileUtil, Forms, Controls,
Graphics,
>   Dialogs, Grids, StdCtrls;
>
> type
>
>   { TFCLientes }
>
>   TFCLientes = class(TForm)
>     BClientsRefresh: TButton;
>     PQConnection: TPQConnection;
>     SQLQuery: TSQLQuery;
>     SQLTransaction: TSQLTransaction;
>     StringGridClient: TStringGrid;
>     procedure BClientsRefreshClick(Sender: TObject);
>   private
>     { private declarations }
>     procedure refreshclients();
>   public
>     { public declarations }
>   end;
>
> var
>   FCLientes: TFCLientes;
>
> implementation
>
> {$R *.lfm}
>
> { TFCLientes }
>
> procedure TFCLientes.BClientsRefreshClick(Sender: TObject);
> begin
>   refreshclients();
> end;
>
> procedure refreshclients();
> begin
>
> end;
>
> end.
>
>
> _______________________________________________
> Lazarus-es mailing list
> Lazarus-es en lists.lazarus.freepascal.org
> http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es
>
Declaraste como privado a refreshclients y te falta poner la clase.
TFCLientes.refreshclients
------------ próxima parte ------------
Se ha borrado un adjunto en formato HTML...
URL: <http://lists.lazarus-ide.org/pipermail/lazarus-es/attachments/20130623/ee1e0c21/attachment-0002.html>