m.br
>
> >To: delphi-br@yahoogrupos.com.br
> >Subject: [delphi-br] Re: Dúvidas no componente MediaPlayer! "Thiago
> >Quinelato" Date: Sun, 26 Mar 2006 16:15:26 -
>
> >
> >Carissimo Thiago Quinelato
> >
> >Já deu para eu executar de forma
Acho que seria mais ou menos isso:
MediaPlayer1.FileName:=table1.FieldByName('caminho').asString;
Isso carregaria o arquivo indicado pelo campo 'caminho' da table1.
Só uma pequena correção no código que vc mandou:
O correto seria
MediaPlayer1.FileName := 'c:\jogo\fase\clock.avi';
e não
MediaPla
Utilize o TClientSocket, da aba internet. Se não estiver instalado, instale
o pacote dclsockets70.bpl, que fica na diretório bin, dentro do diretório do
Delphi.
Agora, isso depende do servidor... se for um indy, por exemplo, acredito que
você deva usar um cliente em indy.
Mas tenta, se num der, pos
Solução trabalhosa, mas funcional:
Coloca um socket cliente no projeto, acessando a porta 80 e o servidor de
onde vc vai pegar a página. Depois, conecte esse socket e mande uma
mensagem, pelo ClientSocket1.Socket.SendText(); Envie ('get
'+nome_da_pagina). Logo depois, o servidor responde com a pági
Oi.
Um professor meu, o melhor de todos os que eu já tive, montou um programa
que pode servir pra vc.
Tá na página dele, e é livre.
http://www.ctu.ufjf.br/~alberto/Programas/programas.html
Espero que isso ajude.
--
Thiago de Oliveira Quinelato.
Aluno do 4º Módulo do Curso Técnico de Informática Ind
Não sei se a lista recebeu minha resposta, pq foi detectado spam (?!) pelo
servidor.
Estou enviando novamente, então...
Editando a mensagem anterior:
Para descobrir o caracter relacionado a um código ASCII, use a função chr();
Ela retorna o char correspondente ao word que você colocar como parâmet
15-75-74-85-41-14-147
>
> Onde cada numero eh o numero ascii, como pego cada numero e converto
> novamente para a palavra?
>
> Desde já agradeço
> []s
> Fellipe H;.
>
>
> Em 22/12/05, Thiago Quinelato <[EMAIL PROTECTED]> escreveu:
> >
> > Para descobri
Para descobrir o código ASCII de um char, use a função ord();
Ela retorna o inteiro correspondente ao caracter que você colocar como
parâmetro.
No seu exemplo, eu faria assim:
var i:Byte;
asc, numero:string;
begin
.
.
.
asc:='';
for i:= 1 to length(numero)-1 do
Eu uso DBLookUpComboBox, mas é pq ainda trabalho com alguns bancos no
Paradox (eca!).
--
Thiago de Oliveira Quinelato.
Aluno do 4º Módulo do Curso Técnico de Informática Industrial - CTU/UFJF.
Aluno da 3ª série "A" do Ensino Médio - CTU/UFJF.
Programador de Pascal, Delphi, PHP, Java e MySQL, com co
Olá.
Tente colocar isto dentro do onKeyDown do seu dbGrid:
if (key=46) and (ssctrl in shift)
then
begin
key:=0;
exit;
end;
Depois me diz se deu certo, ok?
Espero ter ajudado.
--
Thiago de Oliveira Quinelato.
Aluno do 4º Módulo d
Olá.
Tente assim:
Function Tform1.GetIPAddress: String;
Type
Name = Array[0..100] Of Char;
PName = ^Name;
Var
HEnt: pHostEnt;
HName: PName;
WSAData: TWSAData;
i: Integer;
Begin
Result := '';
If WSAStartup($0101, WSAData) <> 0 Then
Exit;
New(HName);
If GetHostName(HName^, SizeOf(Name))
les, imagine com firebird/interbase ou outros. A solução seria a
> troca da máquina ou até mesmo um upgrade caso a mesma suporte.
> Abraços.
> --- Em delphi-br@yahoogrupos.com.br, Thiago Quinelato
> <[EMAIL PROTECTED]> escreveu
> > Olá, caríssimos! :D
> > Desenvolvi
Olá, caríssimos! :D
Desenvolvi um sisteminha simplezinho de controle de estoque para o meu
pai, em Delphi, usando para isto arquivos-texto. Na época, não
conhecia as grandes vantagens dos SGBDs, porque ainda estava começando
a estudar Delphi. Só que o programa que fiz não imprimia, porque eu
não ti
Isso acontece em qualquer momento de qualquer projeto?
Já reparei que a paleta de componentes foi feita de maneira bastante
dinâmica e adaptável. Por exemplo, quando um datamodule está selecionado,
vários componentes, por exemplo os visuais, desaparecem, pelo motivo óbvio
da falta de necessidade de
Isso é legal? Posso pegar partes do Delphi de alguém que tenha o Delphi
licenciado? Se sim, quais partes?
Aguardo respostas...
Atenciosamente,
--
Thiago de Oliveira Quinelato.
Aluno do 4º Módulo do Curso Técnico de Informática Industrial - CTU/UFJF.
Aluno da 3ª série "A" do Ensino Médio - CTU/UFJF.
Salve, salve!
Bom, pessoal, estou fazendo o meu projeto final de curso. É um jogo de
damas. Para jogar em rede...
Encontrei um problema para o qual ainda
não encontrei solução e gostaria muito que vocês me ajudassem
O problema é o seguinte: Estou conseguindo conectar os dois PCs entre
si. Já dá
Salve, salve!
Bom, pessoal, estou fazendo o meu projeto final de curso. É um jogo de
damas. Para jogar em rede...
Encontrei um problema para o qual ainda
não encontrei solução e gostaria muito que vocês me ajudassem
O problema é o seguinte: Estou conseguindo conectar os dois PCs entre
si. Já dá
Olá, pessoal!
Gostaria de uma ajudinha...
Estou fazendo um projeto em Delphi, de um jogo de damas. Em
determinado momento, preciso que o canvas de um objeto qualquer fique
transparente. como eu faço isso?
Bom, agradeço a quem ajudar.
Atenciosamente,
--
Thiago de Oliveira Quinelato.
Aluno do 4º Módu
Não sei se estou ajudando em alguma coisa, mas pra que serve a linha
FreeOnTerminate := True; ? Não seria isso?
Bom, se não for, desculpe minha ignorância e por favor me diga a função disso.
Obrigado.
Atenciosamente,
--
Thiago de Oliveira Quinelato.
Aluno do 4º Módulo do Curso Técnico de Informátic
Olá. Pode ser que eu esteja perguntando algo inútil, mas...
A mensagem do showmessage aparece?
vc já teve a paciência de rodar o prog usando F7 pra ver em que linha
ocorre o erro?
será que o erro tá acontecendo nesse bloco q vc passou, ou será no
bloco da procedure imprime? já pensou nisso?
Bom, es
Na verdade, vk_f2 é uma constante inteira...
Para fazer a comparação, use no OnKeyDown (lá key é do tipo word):
if key = vk_f2 then ...
Pelo que me parece, o OnKeyPress não é sensível a teclas virtuais (vk).
Se alguém souber me dizer isso mais ao certo, agradeço.
Quanto à dúvida do Anderson, esper
21 matches
Mail list logo