Ir para conteúdo
Fórum Script Brasil

s3c

Membros
  • Total de itens

    817
  • Registro em

  • Última visita

Tudo que s3c postou

  1. Olá, você não precisa copiar os arquivos, basta você adicionar seu path em: Tools/Environment Options/Library/Library path
  2. s3c

    Internet

    Não entendí sua dúvida. Quando um TClientSocket está conectado a um TServerSocket a desconexão pode ocorrer de 4 maneiras: 1-TClientSocket.Close - é gerado o evento onClientDisconnect no TServerSocket. 2-TServerSocket dá um Close no Socket do Cliente - é gerado o evento onDisconnect no TClientSocket. 3-O TClientSocket sai do ar de forma anormal (por reset, desligar a máquina, matar o aplicativo pelo Task, etc...) - é gerado o evento onClientError no TServerSocket. 4-O TServerSocket sai do ar. - é gerado o evento onDisconnect no TClientSocket.
  3. Olá, seria ± isso ? procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction); begin While (Height > 50) do begin Height := Height - 10; Top := Top + 10; Sleep(5); Application.ProcessMessages; end; end;
  4. Oops, HideCaret não tem a ver com isso. Acho que enabled = false, elimina o blink do cursor.
  5. s3c

    Novato Programando

    Ou também o Memo1.Owner é o objeto TTexto. Note que na procedure TPrincipal.Abrir1Click o Memo1 está dentro do bloco begin/end do With TTexto e na procedure TPrincipal.Salvar1Click não está.
  6. O FindComponent procura pelo nome do componente em seu dono. Ou seu TQRLabel não chama qrlabel10 ou seu Owner não é o Form.
  7. TLabel(Form.FindComponent('label10')).Caption := 'teste';
  8. s3c

    Internet

    Por Sockets você consegue saber todos os ips conectados ao TServerSocket. Por ex, você se conecta ao servidor, manda um comando via SendText ou SendBuf; este recebe através do ReceiveText ou ReceiveBuf; processa e envia o resultado p/ o seu Socket conectado. É você quem define os comandos e a forma como vão ser lidos e processados. Se você for utilizar Sockets, deve saber também conceitos de threads para que um cliente não fique esperando terminar o processamento de outros clientes antes de ser atendido. Aí você cria uma classe descentente de TThread e coloca um TCustomWinSocket que vai referenciar o Socket daquele cliente naquela thread. No evento onAccept do servidor, você instancia a tthread e deixa que ela processe. Espero ter ajudado !!!
  9. s3c

    Erro 32

    Normalmente este erro ocorre quando você tenta acessar um arquivo que está sendo utilizado por um outro processo, ou seja, um outro processo abriu o arquivo antes do seu.
  10. s3c

    Internet

    Bom, é exatamente para isso que servem os componentes TServerSocket e TClientSocket; ou seja; trocar informações remotamente. Dê um exemplo mais detalhado daquilo que você quer fazer, assim se eu souber ficará mais fácil de responder ok ...
  11. s3c

    Pergunta Toska =c

    Acredito que ele queira utilizar o Locate no Dataset.
  12. Experimente colocar no onCreate do Form: Application.ShowMainForm := false;
  13. Não esqueça de dar L.Free no onDestroy do Form.
  14. Crie um TList de labels. var L:TList; Lb:TLabel; i:Integer; // Deixe L como variável global begin L := TList.Create; for i := 0 to MatrizCount-1 do begin Lb := TLabel.Create(Form1); Lb.Parent := Form1; L.Add(Lb); // ajuste left e top end; end; Para Utilizar: var i:Integer; begin for i := 0 to L.Count-1 do TLabel(L[i]).Caption := Matriz[i]; end;
  15. s3c

    Internet

    No TClientSocket coloque o ip do servidor na propriedade Address e a porta do servidor na propriedade Port. No TServerSocket, quando o cliente se conecta e o servidor aceita a conexão, é gerado o evento onAccept. Neste evento utilize Socket.RemoteAddress que é uma string contendo o ip do cliente conectado.
  16. Altere em VDBConsts.pas e DBConsts.pas. Coloque no path do projeto (pasta do Delphi)\...\Source\VCL. Compile p/ gerar os novos dcus e jogue-os na pasta lib do Delphi.
  17. s3c

    Internet

    você pode fazer via Sockets sem problemas. TClientSocket conecta-se ao TServerSocket e os dois se comunicam pelas funções SendText, ReceiveText, SendBuf e ReceiveBuf.
  18. O case requer um tipo ordinal, ou seja, um tipo que tenha uma ordem que o compilador entenda. Por ex, um tipo byte tem uma ordem que varia de 0 a 255. Com isto o compilador 'sabe' os 256 valores possíveis do tipo byte. No seu caso, sua variável Temp é um objeto TComponente ou um de seus ascendentes (TPersistent ou TObject) que não tem ordem nenhuma. É por isso que está dando erro.
  19. s3c

    Query

    É uma sentença sql simples, normal. Qual o problema que você está tendo? Antes de dar Query.Open, dê um ShowMessage assim: ShowMessage(Query.Sql.Text + ' ' + ComboBoxEstado.Text); Depois poste o que aparecer no ShowMessage.
  20. s3c

    BotÃo Apagar

    você conhece a linguagem Pascal?
  21. s3c

    Query

    Olá Lilia, como você alimenta o parâmetro UF ?
  22. s3c

    Temporizador.....

    Se sua aplicação estiver no ar na hora que for para desligar, funciona.
×
×
  • Criar Novo...