lo hice de esta manera
Código Delphi
[-]unit frmSunat_f;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, OleCtrls, SHDocVw, ComCtrls, StdCtrls, ExtCtrls, ActiveX,
IdBaseComponent, IdComponent, IdTCPConnection, IdTCPClient, IdHTTP;
type
TForm1 = class(TForm)
pgc1: TPageControl;
pnl1: TPanel;
Button1: TButton;
wb1: TWebBrowser;
IdHTTP1: TIdHTTP;
mmo1: TMemo;
procedure FormShow(Sender: TObject);
procedure Button1Click(Sender: TObject);
private
public
end;
var
Form1: TForm1;
idhttp : TIdHTTP;
implementation
{$R *.dfm}
procedure TForm1.FormShow(Sender: TObject);
var _documento1, _Documento2 : WideString;
begin
wb1.Navigate('http://www.sunat.gob.pe/cl-at-ittipcam/tcS01Alias');
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
idhttp := TIdHTTP.Create(nil);
mmo1.Text := idhttp.Get('http://www.sunat.gob.pe/cl-at-ittipcam/tcS01Alias');
IdHttp.free;
end;
end.
se puede identificar la tabla con los elementos que contiene via delphi?
esta parte es la que me interesa, se que puedo buscar un texto y de ahi ir tanteando, pero pense que habria alguna otra forma?
Cita:
DESDE AQUI
<td width='4%' align='center' class="H3">
<strong>1</strong>
</td>
<td width='8%' align='center' class="tne10">
2.578
</td>
<td width='8%' align='center' class="tne10">
2.578
</td>
<td width='4%' align='center' class="H3">
<strong>2</strong>
</td>
<td width='8%' align='center' class="tne10">
2.570
</td>
<td width='8%' align='center' class="tne10">
2.572
</td>
<td width='4%' align='center' class="H3">
<strong>5</strong>
</td>
<td width='8%' align='center' class="tne10">
2.577
</td>
<td width='8%' align='center' class="tne10">
2.577
</td>
<td width='4%' align='center' class="H3">
<strong>6</strong>
</td>
<td width='8%' align='center' class="tne10">
2.576
</td>
<td width='8%' align='center' class="tne10">
2.577
</td>
</tr>
<tr>
<td width='4%' align='center' class="H3">
<strong>7</strong>
</td>
<td width='8%' align='center' class="tne10">
2.576
</td>
<td width='8%' align='center' class="tne10">
2.577
</td>
<td width='4%' align='center' class="H3">
<strong>8</strong>
</td>
<td width='8%' align='center' class="tne10">
2.578
</td>
<td width='8%' align='center' class="tne10">
2.579
</td>
<td width='4%' align='center' class="H3">
<strong>9</strong>
</td>
<td width='8%' align='center' class="tne10">
2.578
</td>
<td width='8%' align='center' class="tne10">
2.579
</td>
<td width='4%' align='center' class="H3">
<strong>11</strong>
</td>
<td width='8%' align='center' class="tne10">
2.578
</td>
<td width='8%' align='center' class="tne10">
2.579
</td>
</tr>
<tr>
<td width='4%' align='center' class="H3">
<strong>13</strong>
</td>
<td width='8%' align='center' class="tne10">
2.578
</td>
<td width='8%' align='center' class="tne10">
2.579
</td>
<td width='4%' align='center' class="H3">
<strong>14</strong>
</td>
<td width='8%' align='center' class="tne10">
2.570
</td>
<td width='8%' align='center' class="tne10">
2.572
</td>
<td width='4%' align='center' class="H3">
<strong>15</strong>
</td>
<td width='8%' align='center' class="tne10">
2.567
</td>
<td width='8%' align='center' class="tne10">
2.567
</td>
<td width='4%' align='center' class="H3">
<strong>16</strong>
</td>
<td width='8%' align='center' class="tne10">
2.569
</td>
<td width='8%' align='center' class="tne10">
2.570
</td>
</tr>
<tr>
<td width='4%' align='center' class="H3">
<strong>19</strong>
</td>
<td width='8%' align='center' class="tne10">
2.573
</td>
<td width='8%' align='center' class="tne10">
2.574
</td>
<td width='4%' align='center' class="H3">
<strong>20</strong>
</td>
<td width='8%' align='center' class="tne10">
2.582
</td>
<td width='8%' align='center' class="tne10">
2.583
</td>
<td width='4%' align='center' class="H3">
<strong>21</strong>
</td>
<td width='8%' align='center' class="tne10">
2.583
</td>
<td width='8%' align='center' class="tne10">
2.583
</td>
<td width='4%' align='center' class="H3">
<strong>22</strong>
</td>
<td width='8%' align='center' class="tne10">
2.585
</td>
<td width='8%' align='center' class="tne10">
2.586
</td>
</tr>
<tr>
<td width='4%' align='center' class="H3">
<strong>23</strong>
</td>
<td width='8%' align='center' class="tne10">
2.582
</td>
<td width='8%' align='center' class="tne10">
2.583
</td>
<td width='4%' align='center' class="H3">
<strong>26</strong>
</td>
<td width='8%' align='center' class="tne10">
2.582
</td>
<td width='8%' align='center' class="tne10">
2.583
</td>
<td width='4%' align='center' class="H3">
<strong>27</strong>
</td>
<td width='8%' align='center' class="tne10">
2.583
</td>
<td width='8%' align='center' class="tne10">
2.583
</td>
<td width='4%' align='center' class="H3">
<strong>28</strong>
</td>
<td width='8%' align='center' class="tne10">
2.580
</td>
<td width='8%' align='center' class="tne10">
2.581
</td>
|