[delphi-br] Exit

Tem um problema estranho por aki tem um trecho de codigo q eh o seguinte: if length(trim(CmbSexo.Text)) = 0 then begin MessageDlg('Digite o sexo', mtInformation,[mbok],0); CmbSexo.SetFocus; exit; end; Caso deixa o campo sexo em branco o programa deveria para a execucao

[delphi-br] GDI.exe

Tem uma aplicacao em delphi 7 com oracle 9i, a base esta em uma maquina com o windows2033 Server, as maquinas cliente rodam com o windows 98... em um dos meus procedimentos chama um relatorio feito em FortesReport, no inicio o sistema funcionava normalmente, de uns dias pra ca começou a aprecer

[delphi-br] Re: Diferençã entre horas

procedure TForm1.Button1Click(Sender: TObject); var hora1 : TDateTime; hora2 : TDateTime; begin hora1 := StrToDateTime('10/12/2004 06:00:00 pm'); hora2 := StrToDateTime('10/12/2004 10:03:09 pm'); Label1.Caption := FormatDateTime('hh:mm:ss', (hora1 - hora2)); end; v c t ajuda ---

[delphi-br] BDE e Access

Preciso me conectar com no Access via BDE, mas to tendo problemas Desculpem minha ignorancia mas nunca se quer abri o access Instalei o Access 97 na minha maquina e to tentando me conctar, tem varios Drivers na lista... Banco de Dados do MS Access Banco de Dados do MS Access 97 Microsoft

[delphi-br] BDE no cliente

Estou desenvolvendo uma aplicação com delphi 7 usando a BDE e com base oracle... agora preciso disbonibilizar essa aplicão nas maquinas clientes, ja esta instaldo o client o q eh preciso ser feito a respeito da BDE nos clientes... tenho q instalar/configurar algo? Estou encontrando um

[delphi-br] Montar Menu em tempó de execução

Estou usando o Delphi6 e preciso construir um menu em tempo de execução... Consigo montar apenas a primeira linha com o seguinte trecho de codigo... var NovoItem : TMenuItem; begin NovoItem := TMenuItem.Create(MainMenu1); MainMenu1.Items.Add(NovoItem); NovoItem.Caption := 'Cadastro';