Ir para conteúdo
Fórum Script Brasil

Jhonas

Monitores
  • Total de itens

    9.657
  • Registro em

Tudo que Jhonas postou

  1. Estou utilizando Delphi X6 / MySql 5 / Zeos 7.2.6 Amigo se não estou enganado, para o delphi X6 voce deve usar a versão do Zeos 6.6 Se ainda assim não funcionar, baixe uma versão mais antiga do Zeos abraço
  2. veja esse link https://www.techonthenet.com/mysql/unique.php abraço
  3. outros exemplos https://www.google.com.br/search?source=hp&ei=GtVOXpXwHPi65OUPrqSO8AY&q=pivot+table+mysql+example&o que=pivot+table+mysql&gs_l=psy-ab.1.3.0j0i22i30l9.1202.13058..15386...0.0..0.562.5670.0j4j4j6j2j2......0....1..gws-wiz.....0..0i131.Vx-euC4rpj8 https://sqlfromhell.wordpress.com/2013/08/15/transformando-colunas-em-linhas-com-unpivot/ http://datacharmer.com/downloads/pivot_tables_mysql_5.pdf OBS: voce tambem pode criar uma tabela temporaria com os campos que voce precisa e depois importar os dados de outra tabela abraço
  4. Qual é o valor em binario que voce quer converter em double ? me passe alguns valores para eu fazer um teste de conversão
  5. exemplos: https://dev.mysql.com/doc/refman/8.0/en/cast-functions.html https://stackoverflow.com/questions/56501984/how-to-convert-blob-to-double-in-mysql abraço
  6. exemplos: https://www.google.com.br/search?ei=o_NLXp3zMpi-5OUPq5e76AQ&q=transformar+coluna+em+linha+mysql&o que=colunas+em+linhas+sql&gs_l=psy-ab.1.1.0i71l8.0.0..142214...0.2..0.0.0.......0......gws-wiz.okPf1eZ5I8U abraço
  7. Voce sabe fazer relacionamento entre tabelas ? exemplos: https://www.google.com.br/search?source=hp&ei=hJkUXsHVJ93A5OUPjqmvqAE&q=relacionamento+entre+tabelas+mysql&o que=referencia+entre+tabelas+mysql&gs_l=psy-ab.1.0.0i22i30l8j0i333l2.1410.7708..14226...0.0..0.590.6912.0j19j5j1j2j3......0....1..gws-wiz.....0..0i131j0j33i22i29i30j33i160.9OnG4I9OwVI https://www.google.com.br/search?ei=D5oUXtuUA5mf5OUP4-KTwAs&q=relacionamento+entre+tabelas+usando+query+delphi&o que=relacionamento+entre+tabelas+usando+query+delphi&gs_l=psy-ab.3...60692.63430..63768...0.2..0.226.1348.0j4j3....3..0....1..gws-wiz.......0i71j33i160.Q145tjp-FGs&ved=0ahUKEwib2IDe3fHmAhWZD7kGHWPxBLgQ4dUDCAo&uact=5 abraço
  8. gostaria de criar DashBoard no Delphi DashBoard nada mais é que um Painel de Controle Voce usa HTML para criar gráficos, tabelas, diagramas e relatórios Os dados podem ser obtidos através de um componente DataSet ( componentes de acesso a Tabela ) Esses links vão te dar uma idéia melhor sobre o assunto https://www.google.com.br/search?source=hp&ei=uFUPXtmYMuqi5OUP8v2_8A8&q=criar+dashboard+delphi&o que=DashBoard+Delphi&gs_l=psy-ab.1.9.0l2j0i7i30l2j0l2j0i30l2j0i5i30l2.1380.5190..17022...0.0..0.224.930.0j4j1......0....2j1..gws-wiz.....0..0i22i30j0i13j0i13i30j0i13i5i30j0i8i13i30.-AdtdFJiyyQ abraço
  9. Sim ... já tinha lido sobre ele http://mikelustosa.kpages.online/tinject Download do componente https://github.com/mikelustosa/Projeto-TInject/blob/master/TInjectInstall.exe abraço
  10. // ligar e desligar o timer inc(on_off); if on_off = 1 then begin /// LIGADO Timer1.Enabled := true; Shape1.Brush.Color:=clgreen; Timer1.Interval := TrackBar1.Position; end else begin // DESLIGADO on_off := 0; Timer1.Enabled := false; Shape1.Brush.Color:=clred; end; quando voce clica uma vez, o contador soma de 1, então a variavel on-off fica com o valor de 1 e executa o codigo relacionado , ou seja ligado. quando voce clica novamente, o contador soma + 1 novamente e passa a valer 2 Se on-off não é 1 ( um ) e sim 2 ( dois ) então ele executa o else, e passa a valer 0 ( zero ) novamente e executa desligado e assim o ciclo se repete a cada vez que voce clicar no botão . abraço
  11. Não compreendi muito bem a lógica do codigo, como que eu sei que vai estar Desligado ou ligado.. Pela variável... On_off ? sim ... se voce notar tem um contador // ligar e desligar o timer inc(on_off); cada vez que voce clica no botão, o contador ( on_off -- variavel inteira ) é somado de 1 ... dependendo do valor, é uma coisa ou outra ( ligado ou deslgado ) abraço
  12. Como eu altero esse tempo ? Basta voce modificar a prorpiedade Max do TrackBar para 2000, 3000, 4000...etc voce tem que mover o trackbar de posição para que ele tenha outros valores Desliguei o enabled do Timer, agora ao clicar não faz mais nada, só muda a cor do shape Voce tem que deixar a propriedade Enabled do Timer = False, antes de executar o programa O código como está funciona perfeitamente. abraço
  13. O que voce quer é um temporizador .. certo ? veja esse exemplo, e faça as modificações para o seu uso: Obs: No botão voce vai ligar e desligar o timer ( deixe o timer em Enabled = false ) No trackbar, voce controla o tempo que voce quer que ele funcione O label serve para mostar o tempo que voce escolher Proriedade Max = 1000 ( trackBar ) 0 - 1000 = vai de zero a um segundo ( voce pode alterar esse tempo ) Ao clicar no botão o shape fica verde e ao final do tempo ele fica vermelho o edit vai mostrar o numero da posição do ponteiro no ProgressBar que vai até 100 unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls, ComCtrls; type TForm1 = class(TForm) Timer1: TTimer; Button1: TButton; Edit1: TEdit; Shape1: TShape; ProgressBar1: TProgressBar; TrackBar1: TTrackBar; Label1: TLabel; procedure Button1Click(Sender: TObject); procedure Timer1Timer(Sender: TObject); procedure TrackBar1Change(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form1: TForm1; on_off : integer = 0; cont : integer =0; implementation {$R *.dfm} procedure TForm1.Button1Click(Sender: TObject); begin // ligar e desligar o timer inc(on_off); if on_off = 1 then begin Timer1.Enabled := true; Shape1.Brush.Color:=clgreen; Timer1.Interval := TrackBar1.Position; end else begin on_off := 0; Timer1.Enabled := false; Shape1.Brush.Color:=clred; end; end; procedure TForm1.Timer1Timer(Sender: TObject); begin inc(cont); edit1.Text := inttostr(cont); ProgressBar1.Position := cont; if cont > 99 then begin cont := 0; Shape1.Brush.Color:=clred; Timer1.Enabled := false; end; end; procedure TForm1.TrackBar1Change(Sender: TObject); begin Label1.Caption := Inttostr(TrackBar1.Position); end; end. abraço
  14. Jhonas

    Mapeamento

    exemplos: https://www.devmedia.com.br/entity-framework-como-fazer-seu-primeiro-mapeamento-objeto-relacional/38756 http://www.macoratti.net/15/07/net_amap1.htm abraço
  15. olhe nos links: Como utilizar campo calculado no delphi https://www.google.com.br/search?source=hp&ei=7i7oXZ7DEpvZ5OUPzr2ruA8&q=campo+calculado+delphi+dbgrid&o que=campo+calculado+delphi&gs_l=psy-ab.1.1.0j0i22i30l6.1044.8438..12972...0.0..0.256.3476.0j19j3....3..0....1..gws-wiz.......0i131.t8xwxiGBi30 abraço
  16. Use o tradutor do google nesses links https://www.google.com.br/search?source=hp&ei=fR_lXb3jKcOP0Abqsq_gAQ&q=2+duplicate+symbols+for+architecture+x86_64&o que=error+2+duplicate+symbols+for+architecture+x86_64&gs_l=psy-ab.1.0.0i333l3.1274.4216..11660...0.0..0.588.2198.1j4j4j5-1....1..0....1j2..gws-wiz.....0..0j0i131.FEpKhaxCuMI abraço
  17. Se voce quer transformar o código em texto, basta copiar e colar dentro do word se não for isso, explique melhor abraço
  18. exemplo https://gist.github.com/mauricioaniche/5b0c7c543de0ca2d4e08 abraço
  19. Jhonas

    Como importar biblioteca

    veja se esses links te ajudam https://www.google.com.br/search?ei=qubfXbDaF7Km5OUPn7ujiAs&q=importar+biblioteca+qpid+c%23&o que=importar+biblioteca+qpid+c%23&gs_l=psy-ab.3...2946.10984..12230...0.2..0.236.1356.0j4j3......0....1..gws-wiz.......0i71j33i160.XZIwYUIQfz4&ved=0ahUKEwiw17Wrm43mAhUyE7kGHZ_dCLEQ4dUDCAo&uact=5 abraço
  20. Esse calculo está correto ? slnovo[i] = slfunc[i] - slfunc[i] * (reaj / 100);
  21. Nesse link tem um exemplo de como ler arquivo texto linha por linha https://docs.microsoft.com/pt-br/dotnet/csharp/programming-guide/file-system/how-to-read-a-text-file-one-line-at-a-time a cada leitura de linha, basta fazer uma verificação se o conteudo da linha tem o que voce procura abraço
  22. Fórmula Celcius para Fahrenheit (56 °C × 9/5) + 32 = 132,8 °F Fórmula Fahrenheit para Celcius (56 °F − 32) × 5/9 = 13,333 °C mas se for apenas o valor inteiro, deveria imprimir correto ... 13 printf("Celsius(Valor inteiro): %d\n",c); abraço
  23. Isso pode ser lixo residual de memória experimente colocar no código int main(){ int i = 0;
  24. Se voce pagar para alguém, não vai aprender faça um pouquinho de esforço, que voce consegue Video aulas https://www.google.com.br/search?source=hp&ei=Fk7cXdqZKpzC5OUP64-f8As&q=mysql+front+como+usar&o que=mysql-front+&gs_l=psy-ab.1.9.0l2j0i30l8.282.17738..20292...4.0..0.662.3234.1j15j0j1j0j1......0....1..gws-wiz.....0..0i131j0i7i30.h5u8wcD4Y_w baixe a versão do Mysql_front que vai ser mamão com açucar..rs https://www.google.com.br/search?source=hp&ei=Fk7cXdqZKpzC5OUP64-f8As&q=mysql+front+6.1+download&o que=mysql-front&gs_l=psy-ab.1.7.0l2j0i30l8.76740.79944..84456...0.0..0.238.1790.0j10j2......0....1..gws-wiz.....0..0i131.nEIstVhGpxs tutorial de como usar o Mysql-Front https://www.google.com.br/search?ei=tU7cXce0Gb6f5OUP0beK8As&q=mysql+front+tutorial&o que=mysql+front+6.1+download&gs_l=psy-ab.1.7.0i71l8.0.0..57406...0.2..0.0.0.......0......gws-wiz.Hv8Soo-vICw abraço
×
×
  • Criar Novo...