
DELPHI-Man32
Veteranos-
Total de itens
895 -
Registro em
-
Última visita
Tudo que DELPHI-Man32 postou
-
preciso saber com instalar o Linux Caldera OpenFree, alguém pode me recomendar alguma apostila, algum site sobre o a instalação e configuração... abraços, vagner
-
uma forma simples de não perder dados e a seguinte: declare a unit: DBIProcs no evento AfterPost da tabela coloque: DBISaveChanges(Table1.Handle);
-
veja a seção de componentes do clubedelphi.com.br lá tem uns componentes para relatorios! Componentes
-
cara, é aquele codigo q postei antes, é justamento o q você quer s diferença é q eu preciso das conta das despesas(cada conta tem um código) e você quer o código das cidades. OK tenta lá, de novo hem! procedure TForm4.DBGrid1DblClick(Sender: TObject); var conta : integer; begin conta := (Table1Conta.AsInteger); if conta = Table1Conta.Value then begin form4.Close; form3.EditConta.text := IntToStr(conta); end; end; Falowsss
-
kro amigo quando você define um campo autoincremento na tbl e você fizer testes executando o programa e deletar alguns registros esse numero gerado automatico é perdido. ex. você posta dois registros na tbl, 1 e 2 se você deletar e depois postar outro, será gerado o nº 3 a assim por diante, vou uma forma de recuperar estes numeros perdidos!
-
kro amigo, nunca programei em vb mais posso garatir que o delphi é muito melhor, digo isso porque já vi muitos artigos e apostilas q fala sobre isso, o delphi é um ambiente totalmente integrado e usa uma linguagem muito dinêmica de facil asimiliação, o PASCAL. essa de dizer qual é o melhor só o programador pode dizer, sua usualizades e preferencias. eu acho que sim! já vi o ambiente vb e algumas linhas de codigo, mas não gostei! mas uma coisa digo com segurança... quando você começa, não quer parar mais.... é muito bom mesmo! existe até aqueles que são loucos por delphi, meu caso, APESAR DE SER UM PROGRAMADOR NOVO! my nick! DELPHI-Man32 falowsss
-
amigo, Arlon pelo que ou entendi, é possivel q ele esteja querendo colocar os dados de uma celula do dbgrid(dados de uma tbl) num edit, e não num dbedit! então pode ser da forma que postei, a diferença é que o edit está num form e o dbgrid com os dados esta num outro form! entendeu! ele não falow em editar dados da tbl... ex: estoou desenvolvendo um sistema de controle de receitas e despesas. então no form de despesas tem um campo chamado "conta" que representa por códigos cada tipo de despesas. No outro form esta todos as contas num dbgrid setado para a tbl contas. quando não sei qual é a conta da despesa clique num speedbutton para abrir o form com o dbgrid, acho a conta e clique duas vezes para ele transferir o codigo da conta pra o dbedit do form despesas. neste form apareceça o cod da conta e sua descrição!
-
depois de muita luta consegui fazer da seguinte forma! passar os dados de uma celula de dbgrid que está em em form para o edit de outro form. veja. procedure TForm4.DBGrid1DblClick(Sender: TObject); var conta : integer; begin conta := (Table1Conta.AsInteger); if conta = Table1Conta.Value then begin form4.Close; form3.EditConta.text := IntToStr(conta); end; end; foi usado duas tabelas referenciadas desp > contas se servir pra vc!
-
olha as outras paletas estão lá, escondidas... olha depois da ultima palete visivel as duas setas < > clique ali e o delphi leva você para as outras paletas do programa, fácil não é?!
-
os iniciantes em DELPHI sofrem muito quando os forms não saem da memoria quando eles são fechados! heis aqui uma ótima forma de tirar o forma da memória! ao invés de chamar o form assim: formXX.show; use FormXX := TFormXX.create ( application ); try FormXX.ShowModal finally FormXX.Release; FormXX := nil; end; pronto! Fonte: clubedelphi.com.br
-
resolvido, tópico fechado!
-
altere as propriedades ENABLED dos DBEdits para false, e também do botão Gravar!, quando clicar no botão adicionar por exemplo! coloque o código para habilitar os componentes! componentetal.enabled:=true; no botão usada para gravar! você pode colocolar uma opção para desabilitar os componentes depois de postar inclusive o botão gravar! inventendo o true para false! espero ter ajudado! se não for isso posta ai denovo!
-
tudo resolvido, tópico fechado!
-
você pode criar uma aplicacao! Esta dica ensina como fazer para que seu aplicativo possa enviar e-mails sem a necessidade de nenhum outro programa. Crie uma nova aplicação e adicione um TButton e um NMSMTP(componente da palheta FastNet). No evento On Click do TButton coloque o seguinte código: procedure TForm1.Button1Click(Sender: TObject); begin NMSMTP1.Host := 'mail.clubedelphi.com.br'; NMSMTP1.UserID := 'Vinicius'; NMSMTP1.Connect; //Inicia a conecção; NMSMTP1.PostMessage.FromAddress := 'vinicius.andrade@clubedelphi.com.br'; NMSMTP1.PostMessage.ToAddress.Text := 'marco@clubedelphi.com.br'; NMSMTP1.PostMessage.ToCarbonCopy.Text := 'AnotherUser@host.com'; NMSMTP1.PostMessage.ToBlindCarbonCopy.Text := 'AnotherUser@host.com'; NMSMTP1.PostMessage.Body.Text := 'Teste de mesg'; NMSMTP1.PostMessage.Attachments.Text := 'c:\File.txt'; NMSMTP1.PostMessage.Subject := 'Teste'; NMSMTP1.SendMail; //Envio do e-mail; ShowMessage('E-Mail Enviado !'); NMSMTP1.Disconnect; end; end. Este é um exemplo simples de como enviar um e-mail para você utilizar em seus aplicativos. veja se isso pode te ajudar ----------------------------------------------------------------------------------------------- Fonte clubedelphi.com.br
-
O componente DBLookupComboBox é utilizado para selecionar registros de uma tabela e gravar em outra tabela. As propriedades necessárias para a utilização são: DataSource - Ligar a DataSource da Tabela ao qual vai receber o valor do registro selecionado; DataField - Ligar o campo de ligação entre as duas tabelas, ao qual vai receber o valor do registro selecionado; ListSource - Ligar a DataSource da Tabela ao qual vai Ter o registro selecionado; ListField - Ligar o campo que será listado quando o usuário abrir a janela para seleção do registro; KeyField - Ligar o campo de ligação entre as duas tabelas, ao qual terá o seu valor enviado para gravação. O campo de ligação entre as duas tabelas pode ser um campo código, pois é este campo que manterá os valores iguais entre as duas tabelas.
-
para podermos exercitar nosso pleno direito de usar o forum, registre-se, escolha um belo nick e poww!!!. falowss. veja se isso pode te ajudar ----------------------------------------------------------------- procedure TForm1.Button1Click(Sender: TObject); var i:integer; const str='1234567890ABCDEFGHIJKLMNOPQRSTUVWXYZ'; max=6; begin Edit1.Text:=''; for i:=1 to max do Edit1.Text:=Edit1.Text+str[random(length(str))+1]; end; -----------------------------------------------------------------
-
cara! uma coisa q as grandes empresas de desenvilvimento de softwares não é vender o software mas sim alugá-lo para as empresas que precisam dele! um exemplo! eu trabalho numa empresa de contabilidade e precisamos muito de softwares para controle contábil, então usamos um software muito bom, mas é locado, a empresa manda uma senha para desbloquear o sistema a cada trinta dias. faça uma pesquina na net em site das empresas e veja o que elas fazem! os valores etc.. ae^h você verá o que é melhor para vc! vender ou locar! nos pagamos R$ 214,00 por mes por um sistema totalmente integrado de contabilidade! falowss!
-
é A BASE DE DADOS MANO! você IRÁ COLOCAR ESTA TBL NO FORM DE LOGIN! FALOWSS!!!. ESTUDO A UNIT E VEJA A LINHA if Table1.Locate....
-
A melhor maneira de criar um SplashScreen para seu projeto, fácil e rápido! 1º ) Crie um novo projeto no Delphi ; 2º ) O Fom 1 que se abriu , será o formulário principal, salve e crie um novo form, form2; 3º ) Coloque no form2 um Panel , um TTimer, altere o align do Panel para Client; 4º ) O form2 , será no Splash , então nele coloque o essencial que não pode faltar , uma Gauge ou se preferir uma Progress Bar . 5º ) Enfeite como quiser o seu Panel , ou seja , sua splash deixe com um visual profissional! 6º ) No evento OnCreate do form2 , coloque : -------------------------------------------------------------- begin Timer1.enabled:=True; end; -------------------------------------------------------------- 7º ) Agora na propriedade Timer do nosso TTimer mude de 1000 para 100 ; 8º ) No Evento OnTimer do nosso TTimer coloque : -------------------------------------------------------------- begin Gauge1.Progress := Gauge1.Progress+1; if Gauge1.Progress = 100 then begin form1.close; end; end; -------------------------------------------------------------- 9º ) No evento OnCreate do forn1 coloque! form2 := Tform2.Create(Self); form2.Showmodal; -------------------------------------------------------------- Tá vendo, não precisa de muita coisa para deixar seu projeto um pouco mais profi! abraços, DELPHI-Man32
-
amigo a tbl esta com a propriedade Active em False, altere para True e pronto! falowwsss!
-
kro amigo, para gravar os dados pre-definidos você usa TDBComboBox ligando as propriedades do componente ao campo da tabela..! ex. na tbl tem o compo "SEXO" pega o TDBComboBox e sete as propriedade DataSource, para o q ta logado na tbl e o DataField p/ o capo SEXO. na propriedade STRINGS coloque as opções! Use o DBEdit! para coocar os campo de uma tbl no form faça: coloque a tbl só! sete o DataBaseName, Escolha a tbl em TableName, clique com o Botão direito na tbl e escola Fields Editor, na caixa, clique com o btn direito e Add Fields. agora arraste pra o form os campos q você quer!
-
entendi! cara é isso mesmo! falowss
-
cara esquece a unit (u_ajuda_login) declare somente a do fm_main que é a u_main este método fuciona! sempre uso! falowss.. qualquer duvida posta ai! este ai eu fiz alguns incrementos que você pode achar estranho!
-
faça o q os amigos disseram! amigo KeitaroSan num focaria chato e incoveniente pro kara fazer uma pesquisa toda ves que fizer um agendamento?