Jhonas

leia esse artigo http://www.planetadelphi.com.br/artigo/97/...ma-muito-simple abraço

se a janela for do seu programa é possivel, se for uma janela de outro programa não abraço

exemplo: procedure TForm1.Button1Click(Sender: TObject); var num : integer; s : string; begin num := length(Trim(Memo1.Lines.Strings[0])); Showmessage(inttostr(num)); s := Memo1.Lines.Strings[0]; delete(s,num,1); Memo1.Lines.Strings[0] := s; end; abraço

em um dos posts que te indiquei, tem o que voce precisa abraço

voce instalou o componente no delphi 2010 ? Essa função funciona corretamente no delphi 2010 function capFileSetCaptureFile(hwnd:THandle; szName:LongInt):LongInt; begin Result := SendMessage(hwnd, WM_CAP_FILE_SET_CAPTURE_FILE, 0, szName); end; código completo de um controle para webcam http://www.delphiturkiye.com/offline/2/10232.html abraço

Faça uma pesquisa no forum http://scriptbrasil.com.br/forum/index.php...lite=webbrowser abraço

tente SendMessage(CaptureWindow, WM_CAP_FILE_SAVEDIB, 0, longint(PAnsichar(path + 'tmp.bmp'))); abraço

eu não tenho esse componente instalado, mas voce deve olhar a documentação ... acho que na guia do usuário http://www.pervasivedb.com/support/Pages/Documentation.aspx abraço

aki esta a foto do programa do meu programa. http://www.4shared.com/photo/boO2B3nV/prog...em_delphi7.html amigo ... voce não deveria ter colocado password no arquivo Veja se no forum já não existe solução para a sua dúvida http://scriptbrasil.com.br/forum/index.php...;highlite=email abraço

Faça uma pesquisa no forum http://scriptbrasil.com.br/forum/index.php...p;highlite=rave abraço

deixe a ( Query) propriedade RequestLive = true para que os dados possam ser alterados e salvos abraço

basta compilar esse código no delphi 7 ( funciona no Vista e no Win7 ) http://www.babooforum.com.br/forum/index.p...-usando-delphi/ abraço

Vi que voce procurou a resposta em outros foruns, e parece que não obteve a sua resposta. No entanto é uma coisa bem simples exemplo: procedure TForm1.Button1Click(Sender: TObject); const C='ABC'; var I, J, K: Integer; begin for I := 1 to length(c) do for J := 1 to length(c) do for K := 1 to length(c) do Memo1.Lines.Add( C[I]+C[J]+C[K] ); end; o resultado para 3 letras seria: OBS: para cada letra a mais que voce colocar na constante, voce inclui um novo FOR e acrescenta no memo exemplo: procedure TForm1.Button1Click(Sender: TObject); const C='ABCD'; var I, J, K, L: Integer; begin for I := 1 to length(c) do for J := 1 to length(c) do for K := 1 to length(c) do for L := 1 to length(c) do Memo1.Lines.Add( C[I]+C[J]+C[K]+C[L]); end; o resultado para 4 letras seria: abraço abraço

se voce colocar o código, talvez alguém possa ajuda-lo abraço

tem nesse link http://www.4shared.com/file/4-6imc1B/PngComponentsSetup.html abraço

veja http://www.pervasivedb.com/Documents/readme_pdac_v10.htm abraço

tente esse http://www.delphi-jedi.org/files/darth/HeadConv.zip abraço

as duas maneiras são corretas, mas eu uso o ApplyUpdates(-1) para garantir que mesmo havendo erros o que estiver correto possa ser gravado se voce usar ApplyUpdates(0) somente se tudo estiver correto é que será gravado, caso contrário não grava nada abraço

exemplos: http://scriptbrasil.com.br/forum/index.php...lite=select+sum outro exemplo: Select sum(valor) as total from dm.q_pag_inq; abraço

Que tal postar o seu código, para podermos analisar o problema ?

veja nesse link http://support.microsoft.com/kb/322756/pt-br abraço

amigo, quase que certeza que seja defeito no proprio plugue ou no conector do fone de ouvido. http://img2.mlstatic.com/jm/img?s=MLB&...619.jpg&v=O se o som está perfeito no falante do micro, deveria sair tambem no fone veja se encontra pelo modelo do seu notebook http://www.emule.com.br/lista.php?categori...rdem=DESTACADOS abraço

Faça um backup do windows http://www.baboo.com.br/conteudo/modelos/F...P_a9958_z0.aspx abraço

Va em Menu > View > Component List Para deixar o programa executável menor e mais rápido, abra a tela de Options/Project. Na página Compiler tire todos os "X" e deixe somente nas caixas: Force far Calls, Smart Callbacks e Extended Sintax. Na página Linker marque um "X" em Optimize for size and load time. Lembre-se fazendo isso o programa ficará menor e mais rápido, porém o Delphi levará mais tempo para compilá-lo outra sugestão é alterar as configurações em Menu > Tools > Environment Options e Menu > Tools > Debugger Options abraço

unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; Memo1: TMemo; OpenDialog1: TOpenDialog; procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation {$R *.dfm} uses ComObj; procedure TForm1.Button1Click(Sender: TObject); var App, AVDoc:Variant; begin OpenDialog1.Execute; App:=CreateOleObject('AcroExch.App'); App.Show; AVDoc:=App.GetActiveDoc; AVDoc.Open(OpenDialog1.filename,''); //seleciona tudo e copia para o clipboard App.MenuItemExecute('Edit'); App.MenuItemExecute('SelectAll'); App.MenuItemExecute('Edit'); App.MenuItemExecute('Copy'); Memo1.PasteFromClipboard; App.Exit; end; end. acabei de fazer um teste usando o código acima, no delphi 7, para abrir um arquivo pdf que tinha varias figuras de peixes .. como pode ver somente o texto foi extraido e jogado dentro de um memo Creio que o problema esteja no seu adobe acrobat abraço