Graymalkin

Eu também achei estranho essa maneira, mas foi a única que imaginei. Em VB.NET (que eu uso mais) é bem mais simples e intuitivo. Abraços, Graymalkin

Eu não tenho o Builder aqui para testar, e tinha feito com o Dev-C++ mesmo. Todavia, o código compila normal com Borland C++ 5.5 (versão para linha de comando apenas). Abraços, Graymalkin

Sim, FormatDateTime. Veja o resultado: ? formatdatetime(date, vbLongDate) Abraços, Graymalkin

Experimente isso aí (coloque no evento Click de um botão): Dim f As New Form() f.Size = New Size(200, 100) f.FormBorderStyle = FormBorderStyle.None f.Opacity = 0.5 f.ShowInTaskbar = False f.DesktopLocation = Me.DesktopLocation f.BackColor = Color.Red f.TopMost = True f.Show() Seria isso? Abraços, Graymalkin

http://www.macoratti.net/activex.htm Que tal? Abraços, Graymalkin

Você pode dar um exemplo (imagem) disso? Abraços, Graymalkin

Você tem que utilizar os eventos ReadProperties e WriteProperties do UserControl. Exemplo: Private Sub UserControl_ReadProperties(PropBag As PropertyBag) m_textcolor = PropBag.ReadProperty("TextColor", vbBlack) 'o vbBlack é o valor padrão, opcional End Sub Private Sub UserControl_WriteProperties(PropBag As PropertyBag) PropBag.WriteProperty "TextColor", m_textcolor End Sub Para o caso da seleção de fontes, basta definir o tipo da propriedade como Font. Exemplo: Public Property Get Font() As Font Public Property Set Font(ByVal nova_fonte As Font) Para as cores, defina o tipo como OLE_COLOR. Abraços, Graymalkin

Os dados podem estar sendo exibidos na DBGrid, mas provavelmente a origem deles é a partir de uma Table, certo? Então, basta que você percorra os registros da table acumulando os valores desses campos em variáveis. Abraços, Graymalkin

Procure saber se o fabricante da webcam disponibiliza um meio (componente, biblioteca, etc., em geral uma DLL) de obter a imagem a partir do seu programa. Abraços, Graymalkin

Você tem o Jet instalado? Se não tiver certeza, baixe ele do site da Microsoft e instale para ver se resolve o problema. Abraços, Graymalkin

"Traduzindo" isso aí direto para C/C++, acredito que ficaria: double Combination(int n, int r) { int w = n-r; int d = 1; int i; double x; for (i=2; i<=n; i++) d = d * i; int e = 1; for (i=2; i<=r; i++) e = e * i; int f = 1; for (i=2; i<=w; i++) f = f * i; x = e * f; x = d / x; return x; } Só não sei é realmente o que você quer. Abraços, Graymalkin

É, no C# é um pouquinho diferente de como ocorre no VB.NET, mas a idéia foi declarar um objeto público e estático para referenciar a instância criada da janela e mudar o escopo da declaração da label de private para public. Se ficou complicada a explicação, baixe esse exemplo: http://www.graymalkin.globalhosts.com.br/stuff/CS1.zip Abraços, Graymalkin

Na verdade, nem getche() nem getch() ficam esperando você tecla Enter. Ambos foram feitos para ler apenas um caracter do teclado e terminar imediatamente. A diferença é só que o primeiro ecoa o caracter na tela e o segundo não. Abraços, Graymalkin

Segui a mesma idéia que o Rafael e veja o que obtive: #include <conio.h> #include <stdlib.h> using namespace std; int main() { char c; char s[200]; int i=0; while (i<199) { c = getch(); if (!(c>=48 && c<=57)) { putch(c); s[i] = c; i++; } } system("pause"); } Dê uma olhada se serve aos seus propósitos. Abraços, Graymalkin

Isso pode ter haver com o fato de todas as strings em .NET serem do tipo Unicode. Talvez o MySQL só suporte ANSI e não Unicode (é só um chute, não tenho certeza sobre isso). De qualquer forma, você pode tentar converter a string e ver se dá pra gravar corretamente. Veja um exemplo: Dim s As String = "çéá" Dim c() As Char = CType(s, Char()) Dim b() As Byte = System.Text.Encoding.Default.GetBytes(c) MsgBox(System.Text.Encoding.GetEncoding(1252).GetString(b)) Experimente gravar o resultado que aparece na caixa de mensagem e veja se dá certo. Abraços, Graymalkin

Qual o erro apresentado? Abraços, Graymalkin

Com a Flexgrid ou a Hierarchical Flexgrid você pode preencher suas células através da propriedade TextMatrix. Bastaria ir lendo o arquivo texto e preenchendo as linhas/colunas. Abraços, Graymalkin

Não, não existem mais arrays de controles. Entretanto, você pode fazer com que todos os seus labels se refiram a uma mesma rotina de acordo com o evento desejado. Para isso basta acrescentar o evento correspondente no final do Handles que existe na declaração da rotina que é executada quando o evento é levantado. Abraços, Graymalkin

Que tal isso aqui? variavel = "Form1" achou = False For Each f In Forms If f.Name = variavel Then achou = True Exit For End If Next f If achou Then f.Caption = "teste" End If O único problema é que só funciona para forms que já tenham sido carregados previamente. Abraços, Graymalkin

Como você utiliza essa DLL? (Criando um objeto ou ela simplesmente através da declaração de uma função?) Abraços, Graymalkin

Dê uma procurada aqui no fórum por ShellExecute e você encontrará a solução para o seu problema. Abraços, Graymalkin

Como está a sua string de conexão? Você adicionou a parte da senha do jeito que está no outro post (o do link)? Abraços, Graymalkin

Com o CreateObject(), seu código ficaria: Set ObjWord = CreateObject("Word.Application") ObjWord.Documents.Open App.Path & "\Relatorios\Arquivos\relatorio1.doc" Set DocWord = ObjWord.ActiveDocument Set SelWord = ObjWord.Selection Note que só mudou a primeira linha. A vantagem é que você *não* precisa referenciar o Word (no Project -> References) e o seu código fica "independente" da versão do Word instalada (é claro que é possível que você utilize um determinado recurso que existe em uma versão e não em outra, mas isso é difícil de ocorrer). Abraços, Graymalkin

Hehehe... E tem outro ainda menor (só com uma linha), mas que não é funcional em todas as versões do Windows. Abraços, Graymalkin

Ah, se é só curiosidade então vale comentar que a passagem de parâmetros por referência (com o ByRef) é "parecido" com o que poderíamos chamar de um ponteiro. Abraços, Graymalkin