Ir para conteúdo
Fórum Script Brasil

Graymalkin

Veteranos
  • Total de itens

    8.257
  • Registro em

  • Última visita

Tudo que Graymalkin postou

  1. Graymalkin

    Exportar Para Pdf

    Use um driver de impressora que "imprima" para PDF: http://www.primopdf.com/ Abraços, Graymalkin
  2. Random, de randômico, aleatório. Abraços, Graymalkin
  3. Putz, brother. Escreva devagar e leia pelo menos umas duas vezes o que você escreveu. Sinceramente não entendi a primeira parte: "o que e esse ent". "Ent"? Quê "ent"? Quando a Rnd(), é uma função que retorna um número aleatório. Abraços, Graymalkin
  4. Graymalkin

    Image

    Se você quer colocar algo em baixo de outro algo, basta pegar a posição atual desse "outro algo" e somar com a altura do mesmo. Imagine uma folha de papel colocada em uma mesa e como você faria para colocar outra folha de papel exatamente embaixo da primeira. A lógica é exatamente a mesma. E o mesmo vale para o alinhamento horizontal. Pegar a posição à esquerda (Left) irá te dar a posição atual de algo. Se você quer colocar um outro algo nessa mesma posição, é só isso que você precisa. Porém, você quer alinhar à direita, ou seja, você quer que o fim desse outro algo esteja na mesma posição que o fim do outro. Você precisa então da diferença entre a largura de ambos, que será somada à posição inicial. Imagine novamente folhas de papel sobre uma mesa e você entenderá melhor. Abraços, Graymalkin
  5. Graymalkin

    Image

    Bom, você disse do lado direito, mas no post aparece do lado esquerdo. Vou supor que é do lado direito mesmo: Image1.Top = Picture1.Top + Picture1.Height Image1.Left = Picture1.Left + Picture1.Width - Image1.Width Não é "comando", é "propriedade" e elas são Height e Width, respectivamente. Abraços, Graymalkin
  6. Graymalkin

    Arquivos

    Exatamente. Experimente aí e você verá que 0 não aparece e os demais podem aparecer como quadradinhos (todos iguais). É claro que isso também pode variar de acordo com a fonte utilizada. Não é "também"; é isso que ela faz. E sim, é claro que ali poderia ser: caracter = "#" & b Abraços, Graymalkin
  7. Graymalkin

    Image

    Basta alterar as propriedades Top e Left para a posição desejada, não? Abraços, Graymalkin
  8. Graymalkin

    Arquivos

    Sim, você poderia criar exceções para determinados bytes (como o 0, por exemplo) e inventar alguma coisa que pudesse descrevê-los. No exemplo abaixo, os bytes com valores de 0 até 31 serão representados na forma "#n" onde n é o valor (para encurtar, peguei só o loop): For Each b In bytes caracter = Chr(b) If b >= 0 And b <= 31 Then caracter = "#" & Asc(caracter) End If s.Append(caracter.PadLeft(3, " ")) If qt = 10 Then s.Append(vbCrLf) qt = 0 Else s.Append(" ") End If qt += 1 Next O processo é basicamente o contrário do anterior, ou seja, pegar todos os caracteres (bytes), juntá-los e gravá-los em um arquivo (pode ser sobrescrevendo o anterior, é claro). Porém, pegar e juntar os caracteres vai depender de como você vai exibir o arquivo e de como você vai permitir editá-lo. Abraços, Graymalkin
  9. Verifique se o valor é nulo utilizando a função IsNull(). Abraços, Graymalkin
  10. Sim, repare aqui: Public Class Form1 Inherits System.Windows.Forms.Form Isso é o que vai estar no topo da janela de código de cada um dos forms. Ou seja, é exatamente a declaração de uma classe que herda tudo de System.Windows.Forms.Form (todo form herda dessa classe). Abraços, Graymalkin
  11. Por que isso ocorreria? O "u" na frente do tipo é de unsigned (ou seja, "sem sinal"), o que significa que um uint16 pode guardar um valor entre 0 e 65535. Na verdade, achei esse trecho de código muito estranho. Note que no if você pede um valor que não será utilizado em lugar algum (não está sendo atribuído à ninguém). E somente se o cara digitar um valor maior que 32767 é que lhe será requisitado *novamente* um valor (o ReadLine() dentro do else) e aí sim esse valor será guardado em "vezes". Ou seja, se o cara digitar 120 (no ReadLine() do if), este valor não será utilizado em lugar algum e "vezes" continuará vazio. E sim, no VB não daria erro porque "vezes" teria o valor de 0. Já em C# todas as referências são inicializadas com null. Abraços, Graymalkin
  12. Graymalkin

    Texto

    Você habilitou a propriedade AutoRedraw conforme eu disse no outro post? E, como você está fazendo o lance da cor? Abraços, Graymalkin
  13. Graymalkin

    Arquivos

    É a função Chr(), porém tem o problema de que certos caracteres não têm uma representação gráfica e de que possuem significação própria (um chr(0) vai fazer o texto acabar antes de seu real término). Abraços, Graymalkin
  14. Não, você não precisa disso. Forms são classes e a partir de classes você cria quantos objetos quiser, certo? Então é só fazer: Dim f as new NomeDoForm f.Show() Experimente colocar o código acima no evento Click de um botão e clique no mesmo quantas vezes quiser (quando em execução). Abraços, Graymalkin
  15. Se você quiser apenas procurar pelo início, basta pegar, do nome no arquivo, a mesma quantidade de caracteres do nome digitado. No caso, digita-se "eduardo" (que tem 7 caracteres). Quando o nome "Eduardo Souza" for obtido, pega-se apenas os 7 primeiros caracteres dele, ou seja: "Eduardo". Quando o nome "Eduardo Machado" for obtido, pega-se apenas os 7 primeiros caracteres dele, ou seja: "Eduardo". Vale notar que você também vai precisar converter tudo para minúsculas ou tudo para maiúsculas quando for fazer a comparação. Abraços, Graymalkin
  16. Graymalkin

    Access E Vb6

    Veja este tópico aqui: http://scriptbrasil.com.br/forum/index.php?showtopic=47309 Abraços, Graymalkin
  17. A "string" de que você fala é da classe String ou é um vetor de chars? Se for esse último, você pode utilizar a função strcmp() do cabeçalho "string.h". Se for o primeiro, creio que exista uma sobrecarga no operador == para permitir isso (me corrijam se eu estiver errado sobre este). Abraços, Graymalkin
  18. Para detectar se a aplicação já está sendo executada você pode fazer isso aqui (no Load do form): Dim processos() As System.Diagnostics.Process processos = System.Diagnostics.Process.GetProcessesByName(System.Diagnostics.Process.GetCurrentProcess().ProcessName) If processos.Length > 1 Then MessageBox.Show("Já existe uma instância aberta!") Me.Close() End If Só vou ficar devendo como exibir a janela da instância já aberta, porque todas as minhas tentativas aqui não deram certo. Abraços, Graymalkin
  19. Graymalkin

    Texto

    O quê, exatamente, não dá certo? Primeira coisa... em qualquer propriedade da CommonDialog é que você acha que a cor que você escolheu vai estar? Porque "FileName" (FILENAME = NOME DE ARQUIVO) é onde fica o nome do arquivo escolhido em ShowSave ou ShowOpen. As propriedades Font* ficam com a fonte escolhida em ShowFont. Então, use só um pouquinho a imaginação e pense em qual propriedade é que vai ficar a cor escolhida. Segunda coisa... é na propriedade ForeColor da picture que definimos qual a cor do texto. Abraços, Graymalkin
  20. Porque você não atribui valor nenhum à variável. Note que somente se entrar no else é que "vezes" terá algum valor. No caso, você tinha que trocar... if(System.Convert.ToUInt16(Console.ReadLine()) > 32767){ System.Console.Write("Número inválido!\a"); }else{ vezes = System.Convert.ToUInt16(Console.ReadLine()); } ... por: try { vezes = System.Convert.ToUInt16(Console.ReadLine()); } catch (Exception erro) { vezes = 0; // Não tenho certeza se isso é válido para uint, se não for basta converter System.Console.Write("Número inválido!\a"); } Certo? Graymalkin
  21. Aqui tem um exemplo: http://msdn.microsoft.com/workshop/author/...writingmode.asp Só que, infelizmente, só funciona no IE. Abraços, Graymalkin
  22. Graymalkin

    Texto

    Você fez o que eu disse no último parágrafo do meu post? Se ShowSave (Save=Salvar) abre a janela de "salvar", ShowOpen (Open=Abrir) abre a janela de "abrir", ShowPrinter (Printer=Impressora) abre a janela de impressão, o que você acha que vai abrir a paleta de cores (sendo cor = Color)? Abraços, Graymalkin
  23. Graymalkin

    Editor De Php

    Existem tópicos aqui sobre como efetuar essa colorização em uma RichTextBox. Experimente fazer uma busca. Abraços, Graymalkin
  24. Graymalkin

    Criptografia Em Asp.net

    Você precisa realmente descriptografá-las? Não bastaria comparar a senha já criptografada com a criptografação (isso existe? ) da senha digitada? De qualquer forma, vou ver se instalo o Delphi 2005 aqui e crio uma função que faça isso. Abraços, Graymalkin
  25. Graymalkin

    Erro 430

    Experimente instalar o MDAC 2.0 (que vem junto com o VB) e só depois instalar o MDAC da versão que você está utilizando (2.1, 2.2, 2.3, etc.). Abraços, Graymalkin
×
×
  • Criar Novo...