raphalimam
Membro Júnior-
Posts
9 -
Cadastrado em
-
Última visita
Reputação
0-
Delphi SheelExecute todos os botões abrem o mesmo site.
raphalimam postou um tópico em Programação - outros
Boa tarde, Gente eu estou começando ainda a mexer no delphin e com programação então tenho umas duvidas meio bestas, estou trabalhando num projeto junto com um conhecido, eu estava fazendo os botões da aplicação e percebi que todos os botões mesmo com sites diferentes estão abrindo apenas o link do primeiro botao, porém buscando eu não encontrei nada parecido com isso, entao não sei onde eu errei. unit Unit2; interface uses Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, System.ImageList, Vcl.ImgList, Vcl.ExtCtrls, ShellAPI, Vcl.ComCtrls ; type TForm2 = class(TForm) ImageList1: TImageList; Button1: TButton; Button2: TButton; Button3: TButton; Button4: TButton; StatusBar1: TStatusBar; Panel1: TPanel; Button5: TButton; procedure Button1Click(Sender: TObject); procedure Button2Click(sender: TObject); procedure Button3Click(sender: TObject); procedure Button4Click(sender: TObject); procedure Button5Click(sender: TObject); private { Private declarations } public { Public declarations } end; var Form2: TForm2; implementation {$R *.dfm} procedure TForm2.Button1Click(Sender: TObject); begin ShellExecute(Handle,'open','site1', '',nil,0); end; procedure TForm2.Button2Click(Sender: TObject); begin ShellExecute(Handle,'open',site2', '',nil,0); end; procedure TForm2.Button3Click(Sender: TObject); begin ShellExecute(Handle,'open','site3', '',nil,0); end; procedure TForm2.Button4Click(Sender: TObject); begin ShellExecute(Handle,'open','site4', '',nil,0); end; procedure TForm2.Button5Click(Sender: TObject); begin WinExec('C:\Program Files (x86)\programa\programa.exe', SW_SHOW); end; end. e no caso do Botao 5 eu queria fazer o programa abrir dentro do painel, porém não achei muito sobre isso, e queria saber se alguém tem alguma documentação e indicação sobre como fazer, pois eu percebi que teria que criar um subprocesso porém não achei muito sobre, mas o problema é que mesmo sem dar erro nenhum o programa não abre tentei das 2 formas mas em enhumas o programa abre, ja tentei inclusive usando um código pronto que afirmaram funcionar da calculadora. ShellExecute(Handle, nil, 'C:\Program Files (x86)\programa.exe', nil, nil, SW_SHOWNORMAL ) WinExec('C:\Program Files (x86)\programa\programa.exe', SW_SHOW); procedure TForm2.Button5Click(Sender: TObject); var Handle: THandle; begin Handle := FindWindow(nil, 'Calculadora'); if Handle > 0 then Windows.SetParent(Handle, Panel1.Handle) else begin WinExec(´calc.exe´, SW_SHOWDEFAULT); Handle := FindWindow(nil, 'Calculadora'); if Handle > 0 then Windows.SetParent(Handle, Panel1.Handle); end; end; -
Reparo do fan da placa de vídeo
raphalimam respondeu ao tópico de Luã de Freitas Ramos em Placas de vídeo
A melhor opção é procurar no aliexpress ou no Ml a fan pra comprar, você acha no aliexpress várias fans aí e só procurar pelo modelo da sua gpu pra achar fans dela, a minha 1070ti da Zotac eu comprei a fan no shopee pois tinha uma pá quebrada, funcionava normal mais pra vender fica ruim. -
Gente eu estava pesquisando na internet e esbarrei com a a memoria ram da OXY https://produto.mercadolivre.com.br/MLB-805415197-memoria-ddr3-1333mhz-8gb-oxy-frete-gratis-qualidade-kingston-_JM porém olhando na internet não achei muita coisa além de falarem que é a empresa que fazia memória pra kingston, alguém já usou ou pode falar sobre o desempenho dela?
-
Water cooler custom cpu e vga
raphalimam respondeu ao tópico de raphalimam em Refrigeração e superaquecimento
valeu pela dica, aproveitando o topico, como eu to querendo fazer com cano rígido e não sou acostumado a usar wc custom, já pensando em manutenção dele pensei em fazer um loop tipo e da imagem, e queria saber qual seria a peça ussada na parte de baixo pra fazer aquele cano pequeno pra baixo tampado, que aparenta ser pra poder esvaziar o sistema, os procurando eu não achei nada sobre como usar esse fiting pra fechar sistema. -
Galera, eu atualmente to usando um i74790k com um h60, estou pensando em pegar uma 1080ti Poseidon ou artic storm, pegando uma delas eu gostaria de fazer sistema de wc pra cpu e pra vga. Eu queria saber de quem conhece bem disso se um thermaltake pacific r360 aguentaria os dois? e se caso eu trocasse o radiador que vem nele por um de 480 ele aguentaria? E em último caso até mesmo usando 2 radiadores. Sobre o gabinete se forem querer saber ê um Core p5 então os tubos não deram muitos extensos.
-
Recomendação de GTX 1080 Ti
raphalimam postou um tópico em Montagem e upgrade de computadores de mesa
Galera estou para pegar uma GTX 1080 ti, e gostaria de recomendações sobre qual pegar e o porque, visando que a diferença no preço delas é menor do que 100 reais praticamente. Gtx 1080 ti Gaming X TRIO; Gtx 1080 ti AORUS Windforce; Gtx 1080 ti AMP! Extreme; Gigabyte 1080 ti Gaming OC. Dentre as citadas, qual vocês recomendam e o porque dela e não outra se possível. -
Gente eu tava pensando em pegar uma gtx 1080, mas to vendo uma diferença no preço que nao compensa pegar ela pra full hd então queria saber qual a melhor gtx 1070 que vocês me recomendam. ps: minha configuração atual é com um i7 4790k uma placa-mãe z97-gd65 com 16gb ram, fonte seasonic 620w plus bronze e uma r9 270. PS²: se eu fosse vender a r9 270 quanto vocês acham que da pra conseguir nela.
-
qual gtx 1080
raphalimam respondeu ao tópico de raphalimam em Montagem e upgrade de computadores de mesa
@Imakuni valeu, a fonte que eu uso é a Seasonic Silent S12 620W - 80 Plus Bronze - S12II-620 o que vocês acham dessa http://www.terabyteshop.com.br/produto/6524/placa-de-video-msi-geforce-gtx-1080-armor-8g-oc-8gb-gddr5x-pci-exp -
Galera com essa promoção da nvidia de ganhar o jogo ou For Honor ou o Ghost Recon, eu tava pensando eu pegar um GTX 1080, porém existe tantos modelos que eu fiquei em duvida de qual pegar e qual seria a melhor, atualmente eu tu usando um i7 4790k e um r9 270, com uma fonte de 600w reais, e queria saber tambem se vocês acham que a fonte aguenta ou é melhor trocar junto.
Sobre o Clube do Hardware
No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas comunidades sobre tecnologia do Brasil. Leia mais
Direitos autorais
Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais