Douglas Soares

Leia as regras do fórum...

Tente assim: TextBox3.Text = Val(TextBox1.Text) + (TextBox2.Text) Abraços

Veja esse link: http://www.plugmasters.com.br/sys/materias...rimeiros-Passos Abraços

Parabéns Parcero!!!

Parabéns Jonathan, você merece!

Clique abaixo: http://scriptbrasil.com.br/forum/index.php?showtopic=111308 ou faça uma pesquisa no fórum: http://scriptbrasil.com.br/forum/index.php...3digo+de+barras Abraços

Nos meus cadastros, eu sempre tenho uma guia Consulta e a outra Cadastro... então no OnShow da guia Consulta eu coloco: cds.Refresh; cds.Last; Tenta fazer isso.... Abraços

ExecAndWait(LocaldoSistemaNoPC,'',SW_SHOW); Pirambu!... faltou voce passar para ele a function ExecAndWait voce tambem pode usar o shellExecute Exemplos: http://www.swissdelphicenter.ch/torry/showcode.php?id=93 abraço Segue função ExecAndWait function ExecAndWait(const FileName, Params: string; const WindowState: Word): boolean; var SUInfo: TStartupInfo; ProcInfo: TProcessInformation; CmdLine: string; begin { Coloca o nome do arquivo entre aspas. Isto é necessário devido aos espaços contidos em nomes longos } CmdLine := '"' + Filename + '"' + Params; FillChar(SUInfo, SizeOf(SUInfo), #0); with SUInfo do begin cb := SizeOf(SUInfo); dwFlags := STARTF_USESHOWWINDOW; wShowWindow := WindowState; end; Result := CreateProcess(nil, PChar(CmdLine), nil, nil, false, CREATE_NEW_CONSOLE or NORMAL_PRIORITY_CLASS, nil, PChar(ExtractFilePath(Filename)), SUInfo, ProcInfo); { Aguarda até ser finalizado } if Result then begin WaitForSingleObject(ProcInfo.hProcess, INFINITE); { Libera os Handles } CloseHandle(ProcInfo.hProcess); CloseHandle(ProcInfo.hThread); end; end; Abraços

Puxa fiz a mesma coisa que você num 32Bits e estava x86, porém num 64bits estava AMD64... creio que isso varia de PC para PC... então ficamos nessa :wacko: precisava ter a certeza que em qualquer computador teria 86 ou 64 no meio, dai eu pesquisaria por isso... mas como n tenho certeza então não posso usar essa dica... mas vlw mesmo assim, se eu encontrar uma totalmente funcioal eu dou um toque! Abraços

Certifique-se que a dll de conexão está na pasta da sua aplicação, no caso deve ser a dbexpUIBfire15.dll vamos mudar um pouco seu método, vá no servidor, no painel de controle e no firewall do windows, libere a a porta 3050, depois, vá em C:\Arquivos de Programas\Firebird\Firebird_1_5, e abra o arquivo aliases.conf. No final do arquivo adicione a seguinte linha.... MeuPrograma=C:\Sac\Fonte\dados\BDSIAC.FDB Salve o arquivo.... Na sua fonte edite o trecho por caminho := 'Servidor:MeuPrograma' Servidor é o nome do computador em que está o banco de dados e o aliases, MeuPrograma é o nome que você colocou no aliases. Teste ai, qualquer coisa fala. Abraços

Pra exportar relatórios pro word eu uso o quickreport, ele já tem um componente de expotação que sai perfeitamente no word :rolleyes: ... Não lembro o lugar que peguei, mas se estiver interessado manda MP que acho e te passo o link. Abraços

Consegui.... Obrigado Jhonas!!! Praqueles que estão com o mesmo problema, segue a dica: Desinstale o Delphi, apague a pasta Borland que fica em arquivos de programas, apague todos arquivos do tipo BPL que estão na pasta system32, passe o CCleaner, execute a limpeza, cheque o registro também e corriga os erros. Download CCleaner Abraços

Obrigado, pode deixar qualquer coisa falo, precisando também é só me falar Abraços

Obrigado pessoal! Vou me esforçar pra fazer do SB um fórum melhor pra todos! :rolleyes: Abraços

Olá, tive que reinstalar o meu delphi.... faço isso sempre, mas dessa vez reparei que a paleta Interbase admin sumiu!, já tentei reinstalar varias vezes e ela não aparece... só aparecea Interbase normal.... minha aplicação precisa de um componente que está nessa paleta e agora to desesperado... já procurei em todos os lugares e nenhum tem a solução ideal.... alguém pode me ajudar? Obrigado

Faça uma pesquisa no fórum: http://scriptbrasil.com.br/forum/index.php...te=RxMemoryData Abraços

taca um ClientDataSet e um DataSetProvider ai que resolve ehehe, acho que query não deixa alterar mesmo.... dá pra você coloca-los??? Abraços

Vou ser praticamente obrigado a aprender java esse ano, mas isso é bom :rolleyes: , e isso vai me ajudar muito, obrigado. Abraços

Isso que eu chamo de adaptação huahuashuas :rolleyes: Qualquer problema é só postar! Abraços

Mas então faz o seguinte amigão... Assim que você der o open na query já dê um Query1.Edit, e no evento OnKeyDown do DBGrid coloque pra salvar quando pressionada a tecla enter, exemplo: procedure TForm1.DBGrid1KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin if KEY = VK_RETURN then Query1.Post; end; Abraços

Faça uma pesquisa no fórum: http://scriptbrasil.com.br/forum/index.php...ite=Rave+Report Abraços

Faça uma pesquisa no fórum: http://scriptbrasil.com.br/forum/index.php...e=rave+designer Abraços

Veja se tem a paleta DataAcess e coloque um DataSource, um ClientDataSet e um DataSetProvider, depois vá na paleta DBExpress e adicione uma SQLQuery, coloque sua query na SQL do SQLQuery, ligue o DataSetProvier na Query, o ClientDataSet no DataSetProvider e o DataSource no ClientDataset, agora ligue o DataSource no seu DBGrid e faça o teste... OU retire o Order by do seu comando sql e ordene assim: Vá no formcreate e adicione isso: procedure Tform1.FormCreate(Sender: TObject); var i : integer; begin for i := 0 to cds.FieldCount - 1 do begin cds.IndexDefs.Add('a' + cds.Fields[i].FieldName, cds.Fields[i].FieldName, []); cds.IndexDefs.Add('d' + cds.Fields[i].FieldName, cds.Fields[i].FieldName, [ixDescending]); end; end; Obs: no lugar de cds coloque seu AdoDataSet se você tiver um. No evento OnTitleClick do DBGrid coloque isso: if 'a' + Column.FieldName = cds.IndexName then cds.IndexName := 'd' + column.FieldName else cds.IndexName := 'a' + column.FieldName; Abraços

Muitos não devem saber o que é, então dei uma fuçada na net e peguei esse texto, no final da pagina tem a fonte e outras informações... O que é o Delphi? Ele é um ambiente de desenvolvimento de aplicações, orientado a objetos, que permite a criação de aplicações para sistemas operacionais, como templates e experts de aplicações e formulários (wizards), que aumentam muito a produtividade, facilitando a programação. Além disso ele utiliza um dialeto da linguagem Object Pascal, tem os seus componentes definidos como objetos permitindo heranças, permite a criação de novos componentes na própria linguagem, o acesso a banco de dados é fácil e possui um ambiente de depuração integrado facilitando a solução dos erros de programação que poderão surgir durante o desenvolvimento. Programação em Delphi: Características * Orientada ao desenho de formulários ou janelas; * Interface com o usuário feita através de componentes; * Contém um conjunto de controles pré-desenvolvidos que dão acesso às características do sistema; * Cada controle ou componente possui propriedades, métodos e pode responder a eventos. * As propriedades podem ter seus valores definidos em tempo de desenvolvimento e alterados em tempo de execução. Versões do Delphi Delphi Standard Para profissionais que desenvolvem programas de uso genérico e de alta performance. Delphi Professional Para o desenvolvedor preocupado em escrever aplicativos escaláveis para um ambiente cliente/servidor. Delphi Enterprise Versão mais completa, com acesso a bases de dados em servidores remotos. Agora que já conhecemos um pouco sobre o Delphi, adquira a sua licença e aguarde a próxima aula, onde começaremos a estudar dentro do programa. Em caso de dúvida, poste-a no comentário e responderemos o mais breve possível. Para mais informações clique nesse link: http://www.oficinadanet.com.br/artigo/1172..._que_e_o_delphi Abraços

Se você usar o ORDER BY e deixar a opção DGEDIT como true, você não consegue editar mesmo assim?