Ir para conteúdo
Fórum Script Brasil

Graymalkin

Veteranos
  • Total de itens

    8.257
  • Registro em

  • Última visita

Tudo que Graymalkin postou

  1. Se me lembro bem, era isso: posicao := Pos('Connection: close', memo1.text); memo1.text := RightStr(memo1.text, Length(memo1.text)-posicao); É provável que você vá ter que subtrair o tamanho de 'Connection: close' para obter os dados inclusive sem essa linha, mas faça o teste com o código acima. Abraços, Graymalkin
  2. Ok, então você pode tentar aquela dica que eu te passei (do Pos() e do RightStr()), apenas verifique se é "Connection: Close" ou "Connection: close", para poder procurar a string certa. Abraços, Graymalkin
  3. No seu exemplo anterior o "Content-Length" vem depois do "Connection: close". Antes dos sites propriamente ditos, não haveria alguma tag (como <html>)? Abraços, Graymalkin
  4. Use o evento Unload (que possui um parâmetro chamado Cancel). Defina Cancel como 1 e o form não será fechado, e você poderá fazer com que ele suma (Hide). Pra quê tirar se logo acima você perguntou como desabilitá-lo? O local do texto é uma RichTextBox ou é uma textbox comum? Se for a primeira, você pode fazer isso pelo método Find(). Já se for uma textbox comum, você vai precisar usar a função InStr (ou InStrRev), para encontrar uma string em outra, e as propriedades SelStart (para definir o início da seleção) e SelLength (para definir o tamanho da seleção) da textbox. Dê uma procurada aqui no fórum sobre Common Dialogs. Abraços, Graymalkin
  5. Qual a primeira coisa que vem depois destas informações do servidor? Parece que não dá pra usar o "Connection: close" porque ele pode mudar de lugar. Mas, o que vem depois? Abraços, Graymalkin
  6. Parabéns, Andréia! :D Abraços, Graymalkin
  7. Adicione StrUtils na cláusula Uses e depois faça: Memo1.Text := AnsiReplaceStr(Memo1.Text, '<br>', chr(13)+chr(10)); E você terá os <br> substituídos por quebras de linhas. Abraços, Graymalkin
  8. Nunca usei este componente, mas experimente fazer: Cs.Socket.SendText('GET ' + pt + Edit1.Text + ' HTTP/1.1' + chr(13)+chr(10) + 'Host: ' + Cs.Host + chr(13)+chr(10) + 'Accept: */*' + chr(13)+chr(10) + 'Connection: Close' + chr(13)+chr(10)+chr(13)+chr(10)); Veja se dá certo. Abraços, Graymalkin
  9. Graymalkin

    Image

    Ah, mas era justamente isso que eu estava falando. O tamanho de uma Image *não* precisa ser fixo, e eu pensei que você soubesse disso. Foi por isso que o tempo todo eu insisti em dizer que você deveria dimensionar a Image de acordo com o tamanho da imagem exibida (qualquer que seja ela). Basta alterar as propriedades Width (largura) e Height (altura) dela. Abraços, Graymalkin
  10. Dê uma olhada na função mouse_event da API Win32: http://www.allapi.net/ ou http://www.mentalis.org/ Abraços, Graymalkin
  11. Obrigado pessoal! :D Abraços, Graymalkin
  12. Graymalkin

    Duvida

    Também pode ser assim. Mas o primeiro não está errado. É só identar o código que você vai perceber: for I:=1 to NL do for J:=1 to NC do If MaiorElem:=1 then MaiorElem:=1; Sem o begin... end, cada instrução aceita uma outra única instrução. A única instrução do primeiro for é outro for, e a única instrução do segundo for (que está dentro do primeiro) é um if. As instruções estão em cascata e é por isso que não se precisa de begin... end neste caso. Sim, realmente. :) Abraços, Graymalkin
  13. Graymalkin

    Duvida

    Você só precisa utilizar begin... end se existir mais de uma linha a ser executada dentro do loop, exemplo: for j:=1 to NC do begin // primeira linha; // segunda linha; end; Do contrário, você só precisa usar o ponto-e-vírgula na linha. O mesmo vale se a próxima instrução também for desse tipo (como um if). Certo? ;) Graymalkin
  14. Movi teu tópico para a seção .NET, que trata do Visual Studio .NET. Quanto a tua dúvida, tu já tentaste fazer? O que não conseguiste? Tu tens certeza disso? :blink: Abraços, Graymalkin
  15. meu se o graymalkin ganhar, vamos precisa de 7 moderadores... Huahauhuahuha... mas, eu só acesso a noite (e nos finais de semana), portanto não acho que eu seria um bom monitor. Abraços, Graymalkin
  16. Você não abre nenhum arquivo direto da net sem antes baixá-lo para o computador (nem o seu navegador que você está usando agora faz isso). Portanto, você vai precisar baixar o arquivo, o que pode ser feito via Inet ou Winsock (e você encontrará vários tópicos sobre estes dois). Abraços, Graymalkin
  17. Parabéns, Fabyo!!! :) Abraços, Graymalkin
  18. A mensagem de erro está dizendo que o arquivo de destino já existe (destination file already exists). Você deveria alterar os nomes (ou usar os nomes originais) dos arquivos ao enviá-los. Abraços, Graymalkin
  19. Show de bola os desenhos, hein, kuroi? Parabéns! :) Abraços, Graymalkin
  20. Graymalkin

    Método Split

    Como está o código da sua função? Vale notar também que o Split() da System.String da .NET Framework 1.0 e 1.1 só aceita caracteres (Char) como separadores, e não uma string inteira (que no caso, o vbCrLf, é uma string formada por dois caracteres). Abraços, Graymalkin
  21. Graymalkin

    Image

    Não entendi... sua idéia não é redimensionar a imagem? Não é isso que a propriedade Stretch faz? O problema que você relatou era que a imagem não era redimensionada proporcionalmente, e a idéia que eu te passei é justamente deixar o quadrado (ou retângulo) com um tamanho proporcional ao tamanho da figura (qualquer que seja ela). Abraços, Graymalkin
  22. Graymalkin

    Método Split

    Você pode verificar se a string contém o caracter ou string desejado, através do método IndexOf(). Abraços, Graymalkin
  23. Não conheço esse XMLHTTP, mas acredito que você poderia fazer isso com o DOM (Microsoft XML, v x.xx). Abraços, Graymalkin
  24. Sim, é possível que com outra linguagem você possa obter resultados um pouco melhores. No caso, eu recomendaria a você utilizar a linguagem C. Abraços, Graymalkin
  25. Graymalkin

    Instalador

    Entendo. Outra alternativa seria utilizar o InnoSetup + IsTool que é a dupla excelente (na minha opinião) para criação de instaladores. Abraços, Graymalkin
×
×
  • Criar Novo...