Jump to content
News Ticker
  • Bem vindos a Web Cheats
  • News ticker sample

    Runlevel

    Bronze Member
    • Content Count

      216
    • Joined

    • Last visited

    • Days Won

      1

    Runlevel last won the day on April 15

    Runlevel had the most liked content!

    Community Reputation

    163

    2 Followers

    About Runlevel

    • Rank
      WebCheats
    • Birthday 01/26/1987

    Personal Information

    • Discord
      Xinitrc #5543

    Recent Profile Visitors

    1,257 profile views
    1. Essa é uma pergunta pertinente,Linux é só o kernel? Resposta:Não,ele também é constituido de Shell(interpretador de comandos),compiladores,bibliotecas,e comandos,então concluimos que deve ser dar crédito aos componentes do Linux que citei agora,assim como o Kernel é o coração do sistema operacional,pois dá vida ao mesmo,os componentes do Linux devem ganhar créditos também.Acabo de mencionar isso,porque quando o Linux não era famoso, era chamado de Linux,logo quando o Linux ficou famoso todo mundo chamou de GNU/Linux,então o GNU pegou carona na fama do Linux.
    2. O meu apareceu agora,demora um tempinho para aparecer,era a imagem de um celular.
    3. Exemplo:Fulano ficou 16 horas online hoje e ciclano ficou 20 horas online hoje,esse tempo seria medido a cada dia,em caso de empate venceria o membro que tivesse mais curtidas positivas. Ao mesmo tempo que o membro fica online curtindo o fórum, pode ganhar um prêmio/reputação por ter mais quantidade de curtidas durante o tempo em que ficou online. O que acham?
    4. Qual Linux você usa ou gosta?
    5. Ele não está quebrado,é que é para maiores de 18 anos para assistir no YouTube,clique no link e assista no YouTube.Porque escolhi assim porque o GTA5 não é para crianças por conter conteúdo violento.
    6. Obrigado pela sua atenção,então não existe rótulo de programador que nem eu que cria programas para Windows e Linux?
    7. Componentes necessários: Edit1=Vazio; Button1=Gerar senha; var i:integer; const str='1234567890ABCDEFGH[email protected]!#$%&*'; max=14; begin Edit1.Text:=''; for i:=1 to max do begin Edit1.Text:=Edit1.Text+str[random(length(str))+1]; end;
    8. unit Unit1; {$mode objfpc}{$H+} interface uses Classes, SysUtils, Forms, Controls, Graphics, Dialogs, StdCtrls, Buttons, ExtCtrls; type { TForm1 } TForm1 = class(TForm) Cronometrar: TBitBtn; Parar: TBitBtn; Edit1: TEdit; Timer1: TTimer; procedure CronometrarClick(Sender: TObject); procedure PararClick(Sender: TObject); procedure Timer1Timer(Sender: TObject); private public end; var Form1: TForm1; HoraInicial:TDateTime; implementation {$R *.lfm} { TForm1 } procedure TForm1.CronometrarClick(Sender: TObject); begin HoraInici
    9. procedure TForm1.CalcularCicloDoProcessoClick(Sender: TObject); var n1,n2,resultado:real; //declaração de variáveis do tipo real(aceita numero inteiro e com vírgula) begin n1:=StrToFloat(TempoTrabalhadoEmHoras.Text);// converte n1(numero1) para numero flutuante n2:=StrToFloat(NumeroDeProdutosBons.Text);//converte n2(numero2)para numero flutuante resultado:=n1/n2; //Dividi a variável n1(numero1) e n2(numero2 ResultadoDoCicloDoProcesso.Text:=FloatToStr(resultado);//mostra o resultado convertendo numero flutuante(Float) para texto(String) procedure TForm1.CalcularTaxaDeProducaoClick(Sender: TObje
    10. unit Unit1; {$mode objfpc}{$H+} interface uses Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, StdCtrls; type { TForm1 } TForm1 = class(TForm) Button1: TButton; Button2: TButton; edtcriptografado: TEdit; edttexto: TEdit; edtdescriptografado: TEdit; edtkey: TEdit; Label1: TLabel; Label2: TLabel; Label3: TLabel; Label4: TLabel; procedure Button1Click(Sender: TObject); procedure Button2Click(Sender: TObject); procedure FormCreate(Sender: TObject); private function criptog
    11. Coloque um OpenPictureDialog no Form e digite o código abaixo no botão:Não se esqueça de adicionar um TImage para ver a imagem. Código:
    ×
    ×
    • Create New...