-
Total de itens
8.257 -
Registro em
-
Última visita
Tudo que Graymalkin postou
-
Você pode usar SQL para selecionar apenas os registros que atendem a um determinado critério, abrindo assim um Recordset e preenchendo a segunda DataGrid (assim como você faz com a primeira, a diferença é que haverá um critério). Algo como: rs2.Open "SELECT * FROM tabela2 WHERE campo2=" & rs.Fields("campo1").value, cn, 2, 3 Abraços, Graymalkin
-
Mas, você não tinha feito antes por meio da escolha do arquivo? Basta juntar o que você já tinha feito com o que você descobriu naquele post. Abraços, Graymalkin
-
Você não precisa chamar UpdateRecord, basta o Post. Veja o teste que fiz aqui e funcionou: ADOTable1.Edit; ADOTable1.FieldValues['nome'] := 'teste'; ADOTable1.Post; Abraços, Graymalkin
-
Como assim? Você vai escolher o arquivo e ver a foto, não? Ou você queria por miniaturas (thumbnails)? Abraços, Graymalkin
-
Ainda não experimentei, mas acho que é mesma coisa do VB6 (e de todas as linguagens que conheço), ou seja, abrir a porta LPT1: como se fosse um arquivo de texto normal. Experimente a classe FileStream para isso. Abraços, Graymalkin
-
Para alterar e excluir você pode criar um outro arquivo (auxiliar) e "jogar" tudo do arquivo original para este outro. No caso de alterar quando o programa chegar ao registro que deve ser alterado, ao invés de utilizar as informações do arquivo original, ele usará as novas informações inseridas. No caso de excluir, basta pular o registro que deve ser alterado. Ambas as rotinas serão muito parecidas. Ao final, basta apagar o arquivo original e renomear o auxiliar para o nome do original (ou seja, ele passa a ser o original, porém modificado). Abraços, Graymalkin
-
Você pode fazer isso utilizando tratamento de erro, não? Algo do tipo: On Error Resume Next ''''' 'aqui você tenta abrir a tabela ''''' If err.number<>0 then 'Se ocorreu algum erro é porque a tabela não existe TabelaExiste = False else TabelaExiste = True endif On Error Goto 0 Sacou? Abraços, Graymalkin
-
Dê uma olhada neste post: http://scriptbrasil.com.br/forum/index.php...5&hl=picturebox Abraços, Graymalkin
-
Qual é, exatamente, a mensagem de erro? Abraços, Graymalkin
-
Acho que o ideal seria explicar, exatamente, qual o seu problema. Sinceramente, não sei onde você encontraria material desse tipo com os assuntos que você falou. De qualquer forma, creio que tudo ali possa ser feito por SQL. Você conhece SQL? Abraços, Graymalkin
-
Ops, realmente. O erro foi meu. Não é Project->References e sim Project->Components. Desculpe aí. Em relação a skins, você não precisa de componentes extras. Pode usar pictureboxes para tal. Aqui você encontra um exemplo disso que fiz há um tempo atrás: http://www.graymalkin.globalhosts.com.br/stuff/SkinPrj4.zip Abraços, Graymalkin
-
A idéia é abrir os dois arquivos (pode ser um por vez), ler seus conteúdos e escrever no terceiro (que já estará aberto). Como você está fazendo para gravar nos outros dois? Abraços, Graymalkin PS: Não poste o mesmo post várias vezes. Isso deixa o fórum poluído desnecessariamente.
-
Abra a tabela por SQL usando a cláusula ORDER BY. Exemplo: rs.open "SELECT * FROM tabela ORDER BY campo", cn, 2, 3 Abraços, Graymalkin
-
O evento Change de uma caixa de texto é sempre executado quando seu conteúdo é alterado (ou seja, enquanto você está digitando algo nela). Basta que neste evento entre o código para procurar um registro por um determinado campo (o mesmo que está sendo digitado, no caso). Algo como (usando ADO): rs.Find "campo LIKE '" & caixadetexto.text & "*'" Daí, basta preencher as outras caixas com os campos. Bom, a idéia é mais ou menos essa. Os detalhes ficam contigo. Abraços, Graymalkin
-
Bom, não sei como você faz isso, mas testei aqui e possuindo um MDIForm e um form normal o segundo abre *fora* do MDIForm. Com um MDIForm e um MDIChild o segundo abre *dentro* do MDIForm. De qualquer forma, teoricamente, um MDIChild não passa de um form normal que possui um MDIForm como parent. Abraços, Graymalkin
-
Já tem um tópico aqui tratando disso. Tente fazer uma busca. Abraços, Graymalkin
-
Object Inspector? Não... dê uma olhada nesta foto e você entenderá melhor: http://www.graymalkin.globalhosts.com.br/stuff/progMDI.JPG Abraços, Graymalkin
-
Iguais as janelas do Word, Excel, Photoshop, etc., onde você tem uma janela principal (a tal MDIForm) que possui várias janelas dentro da mesma (as MDIChildren). Abraços, Graymalkin
-
Então, a função que procuras é: Chr(). Exemplo: msgbox chr(65) Abraços, Graymalkin
-
Bom, experimente este código aqui: #include <stdio> void main() { int n; printf("introduza um numero:"); scanf("%i", &n); int i = 0; while (i<=n) { printf("%i", i); i++; } i = n-1; while (i>=0) { printf("%i", i); i--; } } Ele não vai gerar a pirâmide, mas já vai te dar uma idéia de como fazer isso. Experimente executar o programa e digitar 2. Você terá como saída: 01210 Tal qual o exemplo que você forneceu. Abraços, Graymalkin
-
Imprimindo Direto Para Impressora ! [resolvido]
pergunta respondeu ao Polansk de Graymalkin em Delphi, Kylix
Tente: Write(Impressora,#14+'texto'); Ou: Write(Impressora,#27#14+'texto'); Veja se dá certo aí. Abraços, Graymalkin -
Dê uma olhada nos seguintes tópicos (no help do Delphi tem): CmdLine, FindCmdLineSwitch, ParamCount e ParamStr. Só realmente não sei como passá-los em tempo de desenvolvimento. Abraços, Graymalkin
-
Não é problema do seu computador não... isso é normal. Se você reparar a lista é sempre a mesma (não é só 0, repare nos outros), enquanto se está com o Delphi aberto e executando-se o mesmo programa. Isso porque é necessário renovar a semente geradora de números randômicos com a rotina Randomize() antes de se usar Random(). Exemplo: randomize(); edit1.text := floattostr(random(10)); Com isso, os números sempre mudam. Abraços, Graymalkin
-
FormStyle = estilo do form. Pelos nomes dos valores possíveis pode-se deduzir seus propósitos: FsNormal: janela normal, padrão MDIForm: janela MDI (multiple document interface - interface de múltiplos documentos) - daquelas janelas que podem conter outras dentro MDIChild: janela filha de um MDIForm (justamente as janelas que aparecem dentro do MDIForm) StayOnTop: janela do tipo Sempre-Visível (que fica sobre todas as outras). Abraços, Graymalkin
-
Basta usar o método Execute (do Database [DAO] ou do Connection [ADO]) para executar uma SQL assim: DELETE * FROM tabela; Abraços, Graymalkin