在Delphi中获取数据的方法取决于你想要获取的数据类型和来源。以下是几种常见的数据获取方法：
抓取网页数据
使用`TIdHTTP`组件发送HTTP请求并获取网页内容。例如：
```delphi
uses IdHTTP；
function GetWebPageData（const AURL: string）: string；
var
HTTPClient: TIdHTTP；
begin
HTTPClient := TIdHTTP.Create（nil）；
try
Result := HTTPClient.Get（AURL）；
finally
HTTPClient.Free；
end；
end；
```
获取本地文件数据
可以使用文件操作函数来读取本地文件的内容。例如，获取文件大小可以使用`FileSeek`和`TFileStream`组件：
```delphi
var
fs: TFileStream；
begin
fs := TFileStream.Create（'path_to_file', fmOpenRead）；
try
ShowMessage（'File size: ' + IntToStr（fs.Size））；
finally
fs.Free；
end；
end；
```
获取应用程序参数
Delphi在启动时会传递命令行参数给应用程序，可以使用`ParamStr`函数获取第一个参数：
```delphi
procedure TForm1.Button1Click（Sender: TObject）；
begin
ShowMessage（'Application path: ' + ParamStr（0））；
end；
```
获取HTML表格数据
使用`TWebBrowser`组件加载HTML页面，并通过解析HTML文档来提取表格中的数据。例如：
```delphi
uses MSHTML；
procedure TForm1.btnGetTableDataClick（Sender: TObject）；
var
HTMLDocument: IHTMLDocument2；
Table: IHTMLTable；
Row: IHTMLTableRow；
Cell: IHTMLTableCell；
i, j: Integer；
begin
if Assigned（WebBrowser1.Document） then
begin
HTMLDocument := WebBrowser1.Document as IHTMLDocument2；
if Assigned（HTMLDocument） then
begin
Table := HTMLDocument.all.tags（'table'）.item（0, 0） as IHTMLTable；
if Assigned（Table） then
begin
for i := 0 to Table.rows.length - 1 do
begin
Row := Table.rows.item（i, 0） as IHTMLTableRow；
for j := 0 to Row.cells.length - 1 do
begin
Cell := Row.cells.item（j, 0） as IHTMLTableCell；
ShowMessage（'Cell ' + IntToStr（i） + ', ' + IntToStr（j） + ': ' + Cell.innerText）；
end；
end；
end；
end；
end；
end；
```
获取数据库数据
使用ADO或DBX组件连接到数据库，并执行查询以获取数据。例如：
```delphi
var
ADOQuery: TADOQuery；
begin
ADOQuery := TADOQuery.Create（nil）；
try
ADOQuery.Connection := ADOConnection1；
ADOQuery.SQL.Text := 'SELECT * FROM myTable'；
ADOQuery.Open；
while not ADOQuery.EOF do
begin
ShowMessage（ADOQuery.Fields.AsString）； // 获取数据表的第二个字段的值
ADOQuery.Next；
end；
finally
ADOQuery.Free；
end；
end；
```
根据你的具体需求选择合适的方法来获取数据。