Ir para conteúdo
Fórum Script Brasil

Jhonas

Monitores
  • Total de itens

    9.657
  • Registro em

Tudo que Jhonas postou

  1. Voce esta errando na configuração da rede http://www.microsoft.com/brasil/windowsxp/...figconnect.mspx http://www.hardware.com.br/tutoriais/confi...o-rede-windows/ http://www.baboo.com.br/conteudo/modelos/C...P_a5307_z0.aspx abraço
  2. veja http://www.microsoft.com/brasil/windowsxp/...figconnect.mspx http://www.hardware.com.br/tutoriais/confi...o-rede-windows/ http://www.baboo.com.br/conteudo/modelos/C...P_a5307_z0.aspx abraço
  3. Pirambu!, parece que voce é que não entendeu como o código funciona. um alerta do tipo MSN no delphi, vai funcionar para toda a sua aplicação, sempre que voce chamar o procedimento então só para voce entender.... quando voce cria um Form, por padrão voce vai criar uma unit Unit1... certo ? se voce quiser fazer referencia a essa unit1 em sua aplicação voce vai colocar na Uses do Form => Uses Unit1; ou se quiser fazer referencia a essa unit1 em toda a sua aplicação, voce vai colocar na Uses do Form Menu. então voce pode criar um form de alerta e colocar o código que te passei no link ( eu uso assim em um de meus sistemas ) se voce testar o código sozinho ( separado de sua aplicação ) vai ver que é muito simples implementar isso no seu código abraço
  4. nesse link tem uma boa explicação http://fabiolnm.blogspot.com/2009/12/padra...eb-cliente.html abraço
  5. exemplos http://eupodiatamatando.com/estudos/exempl...tml-com-python/ http://www.dalkescientific.com/writings/NB...iting_html.html http://www.decalage.info/en/python/html abraço
  6. Traceback (most recent call last): File "C:\Python24\Lib\site-packages\mod_python\apache.py", line 291, in HandlerDispatch arg=req, silent=hlist.silent) https://issues.apache.org/jira/browse/MODPYTHON-129 File "C:\Python24\Lib\site-packages\mod_python\apache.py", line 528, in resolve_object raise AttributeError, s http://nullege.com/codes/search/mod_python....resolve_object AttributeError: module 'C:/xampp/htdocs/test/mptest.pyc' contains no 'handler' modulo 'C:/xampp.... não contem manipulador ou cabeçalho http://stackoverflow.com/questions/6958871...ango-dictconfig porque a minha nota numa cadeira da faculdade depende deste trabalho se sua nota depende disso, não é melhor voce tentar entender e resolver ? abraço
  7. > a = [1, 2, 3, 4, 5] > a [::-1] [5, 4, 3, 2, 1] ou veja http://www.lcg.ufrj.br/Cursos/algprog/Prog...0-%20Listas.pdf abraço
  8. Em resumo daquilo que esta no link seria: A bilbioteca ZeosLib é composta por um conjunto de ferramentas para que você possta ter uma conexão nativa com banco de dados, ou seja, uma conexão sem drivers auxiliares como o ODBC. abraço
  9. exemplo: voce coloca o código no botão salvar try try CDS_CadmovX.Edit; CDS_CadmovX.Post; //gera a exceção para propagar o erro if CDS_CadmovX.ApplyUpdates(0) > 0 Then Abort else CDS_CadmovX.ApplyUpdates(-1); except //Limpa o Delta .Todas as Alteraçoes , inserçoes , ediçoes são Zeradas CDS_CadmovX.MergeChangeLog; end; finally CDS_CadmovX.Refresh; end; abraço
  10. veja http://marcosalles.wordpress.com/2010/04/0...-clientdataset/ abraço
  11. > st = '0123456789' > reversed(st) > ''.join( reversed(st) ) '9876543210' abraço
  12. O que é ODBC? ODBC (Open DataBase Connectivity) é uma especificação projetada pela Microsoft para permitir que aplicações Windows acessem múltiplas fontes de dados através de um único método sem se importar com os vários formatos de arquivos. A linguagem SQL (Structured Query Language) é utilizada como o método de acesso aos dados através do ODBC. Fornecedores de drivers ODBC (como este) seguem as especificações do ODBC para que qualquer aplicação compatível com ODBC possa acessar os dados disponíveis através do driver. As aplicações compatíveis com o ODBC incluem: Microsoft Access, Word, Excel, PowerBuilder, Borland Delphi, Crystal Reports 9 (Edições Professional, Developer e Advance), Visual Basic e centenas de outros produtos. As dlls para o driver ODBC são IscDbc.dll, OdbcJdbc.dll, OdbcJdbcSetup.dll na pasta C: \ WINDOWS \ system32. ou então veja http://www.sdn.sap.com/irj/boc/go/portal/p...ridelayout=true abraço
  13. voce pode formatar os dados no DBGrid usando o Object Inspector clicando ( duplo click ) no ClientDataSet onde estão os campos da sua tabela, alterando as propriedade DisplayFormat e EditFormat exemplo: se for um campo com valores tipo Float 1789,2000000 DisplayFormat = ,0.00;-,0.00 EditFormat = ,0.00;-,0.00 ficaria: 1.789,20 abraço
  14. A primeira coisa que você precisa entender sobre desenvolvimento para Palm, é que existem vários sistemas operacionais no mercado de palm, os mais conhecidos e utilizados são: PalmOS e Windows Mobile, dependendo do sistema que você precisa desenvolver o seu sistema, vai variar a ferramenta de desenvolvimento que você irá utilizar. Para palmOS por exemplo você pode utilizar o PocketStudio, que esta na versão 3.0 e é uma excelente ferramenta de desenvolvimento, ainda mais para quem trabalha com Delphi, pois seu visual e seus comandos lembra muito o Delphi 7. Agora se você precisa desenvolver uma aplicaçao para Windows Mobile, terá que trabalhar com Java, ou Visual Studio etc. As duas ferramentas encontramos bastante material na net. O Delphi 2006 inclui suporte ao desenvolvimento de aplicações para dispositivos móveis com sistema operacional Windows Mobile, como os smartphones. Veja http://pdaexpert.net/downloads/windows-mob...calized-images/ componentes TMS CETools para Windows Mobile http://www.tmssoftware.com/site/cetools.asp abraço
  15. veja http://www.codigofonte.net/dicas/delphi/19...o-MSN-no-delphi abraço
  16. Jhonas

    mod_python

    Erro de sintaxe na linha 246 do C :/ xampp / apache / conf / httpd.conf: "PythonHandler 'Comando inválido, incorreto ou talvez definido por um módulo não incluído na configuração do servidor. abraço
  17. seguindo o raciocinio do código seria http://www.qfpost.com/file/d?g=XJlWxmAmj é só usar somente um unico RadioGroup1 e usar edits para as alternativas, onde voce pode usar mais de uma linha de texto abraço
  18. veja http://ryan.com.br/wp/autorun-criar/ abraço
  19. reveja o seu código for($i = $min; $i < $max; $i++){ abraço
  20. não é possivel colocar um texto muito grande no RadioGroup1 ( somente o tamanho da linha visivel) para um texto de 2 ou mais linhas é necessario usar o CheckBox1 abraço
  21. veja http://scriptbrasil.com.br/forum/index.php...ite=salvar+foto http://scriptbrasil.com.br/forum/index.php...e=salvar+imagem abraço
  22. como eu faço para "resetar" o RadioGrup RadioGroup1.ItemIndex = -1 RadioGroup1.Items.Clear; abraço
  23. procedure Tfrmos.cmdsalvarClick(Sender: TObject); var i: integer; begin for i:=0 to Grid_Produto.rowCount do begin Table_Ordem.append; Table_Ordem.edit; Table_Ordem.fieldByName('descricao').value := Grid_Produto.Cells[1,i]; Table_Ordem.fieldByName('quantidade').value := Grid_Produto.Cells[2,i]; Table_Ordem.fieldByName('valor_un').value := Grid_Produto.Cells[3,i]; Table_Ordem.fieldByName('total1').value := Grid_Produto.Cells[4,i]; Table_Ordem.fieldByName('desconto').value := txtdesconto.text; Table_Ordem.fieldByName('acrescimo').value := txtacrescimo.text; Table_Ordem.fieldByName('sub_total').value := txtsub_tot.text; Table_Ordem.fieldByName('total').value := txttot.text; Table_Ordem.fieldByName('equipamento').value := txtID_Maquina.text; Table_Ordem.Post; Table_Ordem.ApplyUpdates; PanelDados.Enabled := False; // desativa os controles cmdsalvar.Enabled := False; end; end; end. abraço
  24. // RESPOSTA CORRETA if RadioGroup1.ItemIndex = strtoint(DBText1.Caption) then RadioGroup1.Color := $0080FF80 else RadioGroup1.Color := $0070A5FC; end; o RadioGroup1,ItemIndex só aceita numeros abraço
  25. veja: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls; type TForm1 = class(TForm) RadioGroup1: TRadioGroup; Button1: TButton; Button2: TButton; Label1: TLabel; procedure Button1Click(Sender: TObject); procedure Button2Click(Sender: TObject); procedure RadioGroup1Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation {$R *.dfm} procedure TForm1.Button1Click(Sender: TObject); begin // PERGUNTAS Label1.Caption := 'PERGUNTA: QUANTOS MINUTOS TEM 900 SEGUNDOS ?' end; procedure TForm1.Button2Click(Sender: TObject); begin // ALTERNATIVAS RadioGroup1.Caption := ' ALTERNATIVAS '; RadioGroup1.Items.Append('( A )'+'14 minutos'); RadioGroup1.Items.Append('( B )'+'15 minutos'); RadioGroup1.Items.Append('( C )'+'16 minutos'); RadioGroup1.Items.Append('( D )'+'17 minutos'); end; procedure TForm1.RadioGroup1Click(Sender: TObject); begin // RESPOSTA CORRETA if RadioGroup1.ItemIndex = 1 then RadioGroup1.Color := $0080FF80 else RadioGroup1.Color := $0070A5FC; end; end. OBS: esse é um exemplo onde voce pode melhorar para conseguir fazer o que esta querendo 1 - com relação as perguntas, voce pode tira-las de um banco de dados aleatoriamente ou sequencial Label1.Caption := tabela_pergunta.value; 2 - com relação as alternativas RadioGroup1.Items.Append('( A )' + tabela_alternativa1.value); RadioGroup1.Items.Append('( B )' + tabela_alternativa2.value); RadioGroup1.Items.Append('( C )' + tabela_alternativa3.value); RadioGroup1.Items.Append('( D )' + tabela_alternativa4.value); 3 - com relação a resposta if RadioGroup1.ItemIndex = tabela_resposta.value then RadioGroup1.Color := $0080FF80 else RadioGroup1.Color := $0070A5FC; então voce pode cirar uma tabela de perguntas com os campos : Id Pergunta Resposta e a tabela de alternativas Id Alternativa1 Alternativa2 Alternativa3 Alternativa4 onde o campo Id seria a referencia entre a tabela perguntas e alternativas o campo resposta conteria o numero da alternativa correta ================================================ Use a imaginação e veja o que consegue fazer ... abraço
×
×
  • Criar Novo...