Validar formulário

[nicosif1 0]

unit ULancamentoCaixa;

 

interface

 

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, DB, ADODB, StdCtrls, DBCtrls, Mask;

 

type

TFrmLancamentocaixa = class(TForm)

TBMovimentacao: TADOTable;

TBMovimentacaoMV_IdMovimentacao: TAutoIncField;

TBMovimentacaoCX_IdCaixa: TIntegerField;

TBMovimentacaoCL_IdCliente: TIntegerField;

TBMovimentacaoGC_IdGrupoContas: TIntegerField;

TBMovimentacaoCT_IdContas: TIntegerField;

TBMovimentacaoMV_Data: TDateTimeField;

TBMovimentacaoMV_Historico: TWideStringField;

TBMovimentacaoMV_Valor: TIntegerField;

TBMovimentacaoMV_TipoMovimento: TWideStringField;

TBCaixa: TADOTable;

TBCliente: TADOTable;

TBGrupoContas: TADOTable;

TBContas: TADOTable;

DSMovimentacao: TDataSource;

DSCaixa: TDataSource;

DSCliente: TDataSource;

DSGrupoContas: TDataSource;

DSCONTAS: TDataSource;

Label1: TLabel;

Label2: TLabel;

Label3: TLabel;

Label4: TLabel;

Label5: TLabel;

Label6: TLabel;

DBEdit2: TDBEdit;

Label7: TLabel;

DBEdit3: TDBEdit;

Label8: TLabel;

Button1: TButton;

Button2: TButton;

ComboBox1: TComboBox;

LCCaixa: TDBLookupComboBox;

LCCliente: TDBLookupComboBox;

LCGrupodeContas: TDBLookupComboBox;

LCContas: TDBLookupComboBox;

MKdata: TMaskEdit;

procedure FormClose(Sender: TObject; var Action: TCloseAction);

private

{ Private declarations }

public

{ Public declarations }

end;

 

var

FrmLancamentocaixa: TFrmLancamentocaixa;

 

implementation

 

uses UDM;

 

{$R *.dfm}

function validar(); boolean;

var

ok: boolean;

begin

ok:=true;

if frmlancamentocaixa.MKdata.text = '' then

ok := false;

validar:=ok;

end;

 

 

 

 

procedure TFrmLancamentocaixa.FormClose(Sender: TObject;

var Action: TCloseAction);

begin

action := cafree;

end;

 

end.

[Chrnos 30]

Tá... qual é a dúvida afinal? O que você quer validar e onde quer validar? :huh:

[nicosif1 0]

Tá... qual é a dúvida afinal? O que você quer validar e onde quer validar? :huh:

 

Bom dia cara o meu prof. disse o seguinte que era tarefa fazer a validaçao do formulario e nao disse mais nada ele ate começou a fazer e a aula acabou , so q do jeito q ele deixou da erro!!!!

entao nao sei nem como te explicar o q ele quer q a gente faça acho q é validar as informaçoes que forem inseridas e salvar por data sei la!!!!

se você tiver jeito de me dar alguma dica ficarei agradecido, pois sou novo na area tanto do forum quanto da programaçao.

 

desde ja agradeço a sua atençao!!!!!

[nicosif1 0]

Título do tópico editado conforme regras do fórum.

VALIDAR FORMULARIO http://forum.imasters.com.br/public/style_emoticons/default/seta.gif Validar formulário

o cara beleza é q eu sou novo por aqui, pode corrigir a vontade!!!!!!