Graymalkin

Dx8SDK? Direct X 8 Software Development Kit, é isso? O que você pretende fazer? Abraços, Graymalkin

Basta definir a propriedade DataSource da grid como a tabela. Se você usa DAO, use o DBGrid, se você usa ADO, use o DataGrid. Exemplos: set datagrid1.datasource = rs set dbgrid1.datasource = rs Abraços, Graymalkin

Não é "pelo amor de Deus" não, mas acho que posso te ajudar. Para gerar um executável no Turbo Pascal vá no menu "Compile" e veja se do lado de "Destination" está a palavra "Disk", se estiver clique na opção "Compile" ou "Make". Se ao lado de "Destination" estiver "Memory", clique na opção para que ela seja trocada para "Disk", daí realize o passo anterior. A versão do Turbo Pascal que tenho aqui é a 7.0 que saiu em 1992, portanto ainda não existia o Windows como conhecemos hoje (daí o motivo de tudo "abrir em MS-DOS"). Existe uma versão do Turbo Pascal para Windows, mas nunca usei. Para manter a tela aberta sempre coloque a seguinte linha no final (antes do "End."): readln; Abraços, Graymalkin

Pasta == Diretório Graymalkin

Rickardo, você tem certeza de que tem o ADO instalado? Se não tiver, tente instalá-lo novamente (se quiser baixar: http://www.graymalkin.globalhosts.com.br/data.asp). Bicicleta, ambos os modos funcionam, com algumas diferenças: no primeiro caso (do CreateObject) o objeto ADODB.Recordset é criado na hora e independe da versão instalada do ADO, enquanto que no exemplo que você deu é necessário marcá-lo na opção References do menu Project e ele fica dependente da versão marcada; outra diferença é que no primeiro caso quando você digitar "rs." não aparecerão os métodos e as propriedades, enquanto que no segundo caso sim. Abraços, Graymalkin

Mude a fonte para Courier New. Abraços, Graymalkin

Segue um exemplo: 'Coloque isso em um módulo Public Declare Function EnumWindows Lib "user32" (ByVal lpEnumFunc As Long, ByVal lParam As Long) As Boolean Public Declare Function GetClassName Lib "user32" Alias "GetClassNameA" (ByVal hwnd As Long, ByVal lpClassName As String, ByVal nMaxCount As Long) As Long Public Function EnumWindowsProc(ByVal hwnd As Long, ByVal lParam As Long) As Boolean Dim WC_NAME As String WC_NAME = Space$(255) GetClassName hwnd, WC_NAME, 100 WC_NAME = Trim(WC_NAME) Debug.Print WC_NAME EnumWindowsProc = True End Function 'Coloque isso no evento Click de um botão EnumWindows AddressOf EnumWindowsProc, ByVal 0& Veja que na janela Immediate aparecerão os nomes das classes das janelas abertas. Abraços, Graymalkin

Mude o output para binary e use as instruções Put para gravar e Get para ler. Abraços, Graymalkin

Gigante? Graymalkin

Não sei se o Access possui um arquivo permanente de funções criadas (como é o caso do Word), pois se ele não tiver essa sua função só existirá dentro do arquivo MDB. De qualquer maneira, se for só o caso de usar o Eval() desse jeito, você pode usá-lo através do objeto Microsoft Script Control (opção Components do menu Project). Abraços, Graymalkin

Promotor Advanced, seria assim: Me.Controls.Add "VB.TextBox", "text1" Me.Controls("text1").Top = 100 Me.Controls("text1").Left = 100 Me.Controls("text1").Visible = True Me.Controls("text1").Height = 375 Abraços, Graymalkin

De fato. No entanto, você também pode adquirir o efeito desejado usando uma RichTextBox. Nela, diferentemente da TextBox comum, o tamanho dos caracteres pode variar, assim como a altura em que os mesmos se encontram. O exemplo abaixo gerará 2^4 (em notação matemática, é claro): RichTextBox1.Font.Name = "Times New Roman" RichTextBox1.SelFontSize = 10 RichTextBox1.Text = "24" RichTextBox1.SelStart = 0 RichTextBox1.SelLength = 1 RichTextBox1.SelStart = 1 RichTextBox1.SelLength = 1 RichTextBox1.SelFontSize = 6 RichTextBox1.SelCharOffset = 70 Abraços, Graymalkin

Dê uma pesquisada sobre a API EnumWindows. Qualquer coisa, 'stamos aí. Abraços, Graymalkin

Assino embaixo do que o nosso brother William Rodrigues disse! Abraços, Graymalkin

Você definiu a propriedade DataSource da caixa de texto como Adodc1 e a propriedade DataField (também da caixa de texto) com o nome do campo da tabela? Se isso não for feito, a tabela não é aberta e ocorre esse mesmo erro que você citou. Abraços, Graymalkin

Se o seu programa está realmente no arquivo doc será necessário que você o abra ou pelo menos faça uma macro para isso (guardando-a no Normal.dot, o modelo que o Word usa). Gravando a macro você pode atribuir uma tecla de atalho para a mesma. Além disso, o evento Open do objeto Document é executado toda vez que o documento é aberto (se estiver no doc) ou quando o modelo é aberto (se estiver no Normal.dot). Abraços, Graymalkin

Não, mas não é assim que cria um programa. É necessário que o mesmo seja compilado ou interpretado. Recomendo que você baixe uma apostila de lógica de programação e também uma linguagem de programação apropriada (Python, Pascal, VB, C, etc.). Abraços, Graymalkin

Acredito que seja possível fazer tudo isso em um OCX, mas não sei se é vantajoso. De qualquer forma você deverá ter os Run-Time Components do VB (junto com as DLLs, OCX, etc. necessários). Abraços, Graymalkin

Onde e como você o criou? Aguardo resposta, Graymalkin

Então não é o mesmo que usei... Esse que tenho não pede pra registrar e não tem essa propriedade. Abraços, Graymalkin

Se a questão é apenas exibir basta usar os caracteres 178 e 179. Exemplo: Text1.Text = "2" & Chr(179) Todavia, dentro da programação você deverá usar o ^ ou o **, dependendo da linguagem. Abraços, Graymalkin

Apesar de não concordar com o termo "Arquivo Desconhecido" (nenhum arquivo é desconhecido, todos tem um propósito, por mais estranho que possa parecer) ou com "Extensão Desconhecida" (nenhuma extensão também é desconhecida, todas tem um propósito e existem arquivos em que não existe extensão), acredito que o que você queira é abrir um arquivo para gravação e depois abrir o arquivo para leitura. Para isso, procure sobre as instruções Open, Close, Input e Print, e sobre as funções Input(), Eof(), Lof() e FreeFile(), além dos modos de abertura (Input, Output, Random e Binary). Seguem dois exemplos (o primeiro abre o arquivo para escrita e grava duas linhas, o segundo abre o arquivo para leitura e lê as duas linhas): n = freefile() open "c:\teste.ramon" for output as #n print #n, "primeira linha" print #n, "segunda linha" close #n n = freefile() open "c:\teste.ramon" for input as #n input #n, linha1 input #n, linha2 close #n msgbox linha1 msgbox linha2 Abraços, Graymalkin

Você tentou ao menos usá-la? Pois bem, o código para abrir um arquivo gif animado é: AniGif1.LoadFile "c:\arquivo.gif", False Onde "AniGif1" é o controle no Form. Abraços, Graymalkin

O que você quer dizer com "carregados no Windows"? Em execução? Carregados durante a inicialização? Aguardo resposta. Graymalkin

Componentes OCX podem ser executados diretamente no browser (leia-se Internet Explorer). Em relação as limitações, depende muito do que você pretende fazer. Se for possível, dê mais detalhes a esse respeito. Abraços, Graymalkin