
Kikonanet
Veteranos-
Total de itens
472 -
Registro em
-
Última visita
Tudo que Kikonanet postou
-
Olá, Se você estiver usando SQL, pode usar ORDER BY campo. Ex. SELECT * FROM Tabela ORDER BY Nome; Abs. Kiko
-
Olá, Se você estiver usando uma Query. with Query do begin Close; Sql.Clear; Sql.Add('UPDATE Tabela SET Campo1 ="'+Edit1.Text+'", Campo2 ="'+Edit2.Text+'" '); Sql.Add('WHERE Id = '+EditId.text+''); ExecSql; end; Abs. Kiko
-
Olá, Dê uma olhada neste link.... Acho q ele te ajudará bastante. http://www.forumweb.com.br/foruns/index.ph...&st=entry7721 Abs. Kiko
-
Olá Felipe, Essa função vai retornar um valor (ex. 10), que seria os usuários conectados! Se você fizer um For de 0 até n (10 no exemplo) você estará contando 11 vezes. Então você terá que contar de 1 até 10. For i:=1 to n .... qualquer coisa posta ae. Abs. Kiko
-
Ok. Tópico Fechado Abs. Kiko
-
Olá Éder, Tenta usar só Show; Abs. Kiko
-
Tente isso: procedure TForm1.FormCreate(Sender: TObject); begin RegisterHotKey(Handle, 1, MOD_ALT, VK_F4); end; procedure TForm1.FormDestroy(Sender: TObject); begin UnregisterHotKey(Handle, 1); end; Abs. Kiko
-
Tá dizendo q são incompativeis. O q é o TForm22?? É uma classe sua? Abs. Kiko
-
Olá, Tenta assim: Formlogin:= TForm.Create(self); Formlogin.ShowModal; Formlogin.Release; Abs. Kiko
-
Olá, Tem essa variável Global... Tente colocar no OnCreate do Form Principal shortdateformat := 'dd/mm/yyyy'; Abs. Kiko
-
Olá, Tenta usa FormatDateTime. FormatDateTime('dd/mm/yyyy',now); Usei now para pegar a data atual. Abs. Kiko
-
Olá Felipe, Use essa função para pegar o nº de conexões ativas. Tenta isso: var n:integer; begin n:=ServerSocket1.Socket.ActiveConnections; For i:=0 to n do ServerSocket1.Socket.Connections[i].SendText( texto a ser enviado ); end; qualquer coisa posta ae. Abs. Kiko
-
Olá Felipe, Tenta usar um For.... Ex: For i:=0 to (n-1) do ServerSocket1.Socket.Connections[i].SendText( texto a ser enviado ); onde n, é o nº de Clientes conectados! Abs. Kiko
-
Olá, Tenta colocar Ip estático e ve se funciona... Pode ser q ele não esteja pegando o endereco do Gateway. Vai no prompt de comando e digita ipconfig, e veja o ip q ele pegou! qualquer coisa posta ae. Abs. Kiko
-
Ae, Agora pra todo o Office acontece isso...... Quando tento abrir um arquivo no Word, ele trava na tela de procurar arquivo! Alguém sabe o q pode ser? Abs. Kiko
-
Olá McBlade, Usa a propriedade SelAttributes.Color do RichEdit Ex: RichEdit1.SelAttributes.Color:=clRed; RichEdit1.Lines.Add('Erro'); RichEdit1.SelAttributes.Color:=clBlue; RichEdit1.Lines.Add('Acerto'); qualquer coisa posta ae. Abs. Kiko
-
Olá Annelise, Não seja tão radical! Não é porque está havendo demora nas respostas é que o Fórum tá horroroso! Afinal, até agora muitos tem te ajudado no possível! Vamos ao problema agora! Eu testei o código aki e funcionou! Qual é a versão do seu Delphi e componente Indy? Tá configurado certo o IdSMTP, com Host, Tipo de Autenticação? Abs. Kiko
-
Olá Eder, Tenta usar o método Locate que retorna uma variável boolean. if Table1PERMI.Locate('Campo','1',[LoCaseInsensitive]) then // acessa else // não acessa Abs. Kiko
-
Olá, Acho q assim você consegue. SELECT TabelaAlunos.Nome, TabelaNotas.Notas FROM TabelaAlunos, TabelaNotas WHERE TabelaAlunos.ID=TabelaNotas.ID Onde TabelaNotas = A tabela com as Notas dos alunos e TabelaAlunos = Tabela com os nomes dos alunos. Na propriedade FieldName dos Columns você coloca TabelaAlunos.Nome, TabelaNotas.Notas... qualquer coisa posta ae. Abs. Kiko
-
Olá Tiago, Dê uma procurada nos sites abaixo. http://www.activedelphi.com.br http://www.delphi.eti.br qualquer coisa posta ae. Abs. Kiko
-
if DataModule1.ADODataSet1.Eof then ShowMessage('Usuário ou senha invalidos') Cadê o comando de chamar o form Principal ou fechar o form Login? Abs. Kiko
-
Como assim criar um linha?? Explique melhor. Abs. Kiko
-
Olá Annelise, Dê uma olhada neste link (Ensina envio de email usando os componentes Indy) http://www.imasters.com.br/artigo.php?cn=1...b6e812a01ca52d2 Obs: A dica do Graymalkin o PySendMail funciona muito bem. http://www.graymalkin.globalhosts.com.br/pysendmail.asp Abs. Kiko
-
Olá, Dê uma olhada no site dos desenvolvedores dos componentes Indy. Tem alguns demos, inclusive de receber e-mails, usando IdPOP3. Acho q te ajudará bastante! http://www.indyproject.org/Sockets/Demos/index.iwp Abs. Kiko
-
Olá, Se o usuário não se logar você pode usar o seguinte comando para encerrar a aplicação. Application.Terminate; qualquer coisa posta ae. Abs. Kiko