Pegar valor apartir do id webbrowser

[Regis Santos]

Olá amigos, gostaria de pegar o valor de um determinado id no webbrowser, exemplo:

<input name="ucOneClickCardAdd1:txtNumero" type="text" value="123456" maxlength="25" id="ucOneClickCardAdd1_txtNumero" class="text medium" onkeypress="return SomenteNumero(event)" />

No caso, o programa pegaria apenas a parte value, que no caso é 123456.

Estou quebrando a cabeça a horas com isso e não consigo achar a solução, se possível alguém por favor, dá uma ajudinha.

[Jhonas]

use o comando POS do delphi ....

exemplo

procedure TForm1.Button1Click(Sender: TObject);
var S, texto: string;
begin
S := ' <input name="ucOneClickCardAdd1:txtNumero" type="text" value="123456" '+
'maxlength="25" id="ucOneClickCardAdd1_txtNumero" class="text medium" '+
'onkeypress="return SomenteNumero(event)" />';

if Pos(' type="text" value=', S) > 0 then
texto := copy(s,Pos('type="text" value=', S)+19,6);

showmessage(texto);
end;

o resultado sera = 123456

abraço