Paradox, funções amp; procedimentos

02/02/2003

1

ola pessoal...sou programar novato em delphi e eu estou montando um programa simples com aplicaçoes de bd no paradox...

Gostaria de saber com exemplos faceis como criar procedimentos e fuçoes (privadas e publicas), pois tentei fazer e naum consegui...minha outra duvida sobre a operaçoes de tabelas(incluir,alterar,excluir,confirmar) como faço isso no paradox sem usar o dbnavigator??? de maneira simples para meu sistema....agradeço a todos deste ja


Responder

Posts

02/02/2003

Skaarj

Coloca lá os speedbutons e é assim:

Table1.Insert = Inserir
Table1.Delete = Apagar
Table1.Edit = Editar
Table1.Post = Gravar
Table1.Cancel = Cancelar
Table1.Refresh Atualizar

Table1.Next = Proximo
Table1.Prior = Anterior
Table1. First = Primeiro
Table1.Last = Ultimo

Procedures?
Exemplo bem simples pra limpar 2 edits:

interface

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;

type
TForm1 = class(TForm)
Edit1: TEdit;
Edit2: TEdit;
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
procedure limpar;
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.DFM}
procedure tform1.limpar;
begin
edit1.clear;
edit2.clear;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
limpar;
end;

end.


Responder