Graymalkin

Então é por isso que você não consegue se mexer sozinho. Pense bem: você hoje conseguiria escrever se não tivesse aprendido como montar as palavras (sílabas) e decorado palavras já existentes? E se antes disso não tivesse aprendido o alfabeto primeiro? E, se antes do alfabeto não tivesse aprendido as vogais? A lógica é a mesma para uma linguagem de programação: você tem que aprender as palavras-chaves e as regras; caso contrário, se você for no chute, acaba escrevendo o código tão mal quanto você escreve o nosso Português. picture1.paintpicture image1.picture, x, y Abraços, Graymalkin

Brother, o que separa os parâmetros de uma função? Quando aparece aquela janelinha amarelinha ela já te dá todas as dicas. Abraços, Graymalkin

Você quer que a imagem apareça onde o cara clicou mesmo? Se for, você não tem essas posições guardadas em CurrentX e CurrentY? O que está esperando para utilizá-las? Abraços, Graymalkin

Não sei, ué! É você quem está fazendo o programa. É você que vai decidir se é onde o cara clicou ou se é no topo do lado esquerdo. Qual dos dois *você* quer? Abraços, Graymalkin

Exatamente! Então, quais seriam essas posições? Onde você quer colocar a imagem? Começando no topo do lado esquerdo ou onde o cara clicou? Abraços, Graymalkin

O que são os parâmetros X1 e Y1 de PaintPicture? O que você imagina que eles sejam? Abraços, Graymalkin

mais da um erro no primeiro as porque? Porque não tem "As" ali; não se utiliza "As" nesse caso. Você precisa aprender a utilizar as coisas nos seus devidos lugares. Um código não é escrito à moda bangu; para tudo existe regra. E, no seu caso, deve-se passar os valores desejados, não declarar variáveis. Abraços, Graymalkin

Tem o KDevelop, que vem junto com o KDE. Abraços, Graymalkin

Você não colocou os outros parâmetros obrigatórios de PainPicture. Todos os parâmetros com [] são opcionais, mas os demais não. Abraços, Graymalkin

O método Print só serve para texto. Para outra imagem você precisa do método PaintPicture. picture1.paintpicture image1.picture, x, y Abraços, Graymalkin

Cara, o que tem ali para explicar? Que CurrentX define a posição no eixo X e CurrentY define a posição no eixo Y para desenhar e escrever? Isso é óbvio pelo nome da propriedade (Current = Atual, Corrente). Abraços, Graymalkin

É, estou bonzinho demais hoje... Bom, declare esses dois eventos aí (supondo que sua PictureBox se chame Picture1): Private Sub Picture1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = 1 Then s = InputBox("Digite o nome:") Picture1.Print s End If End Sub Private Sub Picture1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) Picture1.CurrentX = X Picture1.CurrentY = Y End Sub Creio que nem precise de explicação. Abraços, Graymalkin

Você pode utilizar as propriedades CurrentX e CurrentY para definir onde o texto irá começar. Basta atribuir os valores (posições) à elas. Para detectar onde o usuário clicou você pode utilizar o evento MouseMove. Isso é tudo que você precisa saber, portanto você já tem um ponto de partida e já pode tentar fazer sozinho. Abraços, Graymalkin

Oh brother... você não tem o help do VB aí não? Aliás, algumas funções você pode ver utilizando o Object Browser. Bom, vamos lá: n = freefile() Obtém um número identificador de arquivo disponível open com.filename for input as #n Abre (OPEN) o arquivo indicado para (FOR) leitura (INPUT) como (AS) o número n. É praticamente uma frase, não? conteúdo = input(lof(n), n) A função input() lê uma quantidade desejada de bytes (caracteres) do arquivo. No caso, lof() (Length Of File) retorna o total de bytes do arquivo, portanto o arquivo inteiro será lido. O segundo parâmetro é o número do arquivo. close #n text1.text = conteúdo Precisa explicação? Abraços, Graymalkin

Se não me engano, quando é <arquivo.h> o arquivo deve realmente estar na pasta de Includes do compilador. E quando é "arquivo.h" o arquivo deve estar na mesma pasta que o fonte. Abraços, Graymalkin

Olhe a prototipação: procedure setquadrado(ax1,ay1,aresta:integer); E agora olhe a declaração: procedure TQuadrado.setquadrado(ax1,ay1,arest:integer); Ao que parece, diferentemente de outras linguagens, onde o que importa são os tipos dos parâmetros, Delphi se preocupa também com os nomes. Abraços, Graymalkin

Isso não vai abrir um arquivo nunca... "Com.FileName" só tem o nome do arquivo, não o seu conteúdo. O que você tem que fazer é isso aqui: n = freefile() open com.filename for input as #n conteúdo = input(lof(n), n) close #n text1.text = conteúdo Certo? Graymalkin

E qual a mensagem do erro? Abraços, Graymalkin

Acho que você está misturando as coisas aí. GetString() é um método de um ADODB.Recordset, ou seja, de um Recordset do ADO (ActiveX Data Objects). No caso aí você está utilizando DAO (Data Access Objects) cujo Recordset não possui esse método. ADO é a tecnologia para acesso a dados mais recente e DAO é o método de acesso a dados nativo do VB. Hoje em dia, dá-se preferência ao aprendizado do ADO. Se o seu código não for extremamente dependente de elementos do DAO, não será difícil a adaptação para ADO. Experimente fazer uma busca no fórum e você verá exemplos disso. Abraços, Graymalkin

A explicação já está na página informada no tópico que indiquei. Abraços, Graymalkin

Marque uma referência ao DAO (Data Access Objects) pela opção References do menu Project. Ou, simplesmente coloque um componente Data no seu form e retire-o em seguida (só de colocá-lo a referência já será feita automaticamente). Abraços, Graymalkin

Esse namespace "VisualBasic" não é o VB6, é o próprio VB.NET (afinal de contas, o nome da linguagem é "Visual Basic"). Suponho que todas as vezes que você falou ".NET" no seu post você quis dizer "C#", certo? E sim, claro que tem como utilizar funções do VB.NET no C# (aliás, essa é uma das maravilhas da .NET, você pode criar funções em uma linguagem e utilizar em outra). Você precisa é fazer uma referência ao Microsoft Visual Basic .NET. No #Develop ou no VS (neste os itens estão em Inglês, é claro) vá na janelinha Projeto, dê um clique com o botão direito sobre "Referências" e escolha "Adicionar Referência..." e na janela que surgir escolha o Microsoft.VisualBasic (dê um duplo-clique sobre o mesmo para ele entrar na lista de referências). Depois disso o seu código vai passar a funcionar. Abraços, Graymalkin

Esse problema tem uma solução aqui: http://scriptbrasil.com.br/forum/index.php?showtopic=54556 Você tem que fazer assim: Text1.FontBold = com.FontBold Text1.FontItalic = com.FontItalic Text1.FontName = com.FontName Text1.FontSize = com.FontSize Text1.FontStrikethru = com.FontStrikethru Text1.FontUnderline = com.FontUnderline Abraços, Graymalkin

Esplica isso por codigo por favor. Ok, veja, sendo "algo" = "Image1" e "outro algo" = "Picture1": image1.top = picture1.top + picture1.height "Picture1.Top" é a posição no eixo Y da picture1 no form e "Picture1.Height" é a sua altura. Se eu somar a posição Y mais a altura do objeto, tenho a posição imediatamente abaixo do objeto. Abraços, Graymalkin

Eu onde eu disse isso??? Leia novamente o meu post, e com atenção dessa vez. Abraços, Graymalkin