-
Total de itens
8.257 -
Registro em
-
Última visita
Tudo que Graymalkin postou
-
Use um driver de impressora que "imprima" para PDF: http://www.primopdf.com/ Abraços, Graymalkin
-
Random, de randômico, aleatório. Abraços, Graymalkin
-
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
-
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
-
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
-
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
-
Basta alterar as propriedades Top e Left para a posição desejada, não? Abraços, Graymalkin
-
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
-
Verifique se o valor é nulo utilizando a função IsNull(). Abraços, Graymalkin
-
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
-
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
-
Você habilitou a propriedade AutoRedraw conforme eu disse no outro post? E, como você está fazendo o lance da cor? Abraços, Graymalkin
-
É 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
-
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
-
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
-
Veja este tópico aqui: http://scriptbrasil.com.br/forum/index.php?showtopic=47309 Abraços, Graymalkin
-
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
-
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
-
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
-
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
-
Aqui tem um exemplo: http://msdn.microsoft.com/workshop/author/...writingmode.asp Só que, infelizmente, só funciona no IE. Abraços, Graymalkin
-
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
-
Existem tópicos aqui sobre como efetuar essa colorização em uma RichTextBox. Experimente fazer uma busca. Abraços, Graymalkin
-
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
-
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