Author |
|
John Muller Newbie
Joined: 18 October 2009
Online Status: Offline Posts: 5
|
Posted: 26 October 2009 at 8:12am | IP Logged
|
|
|
Hi,
I would like to iterate the array that is
generated by Pop3.search in Delphi.
This code:
var
i: integer;
SearchArray: OLEVariant;
begin
SearchArray := MyPop.Search;
for i := 1 to High(SearchArray) do
ShowMessage(SearchArray);
end;
does not work (types not compatible). How can
I do what I need?
Thanks. Uli
|
Back to Top |
|
|
Alex AfterLogic Support
Joined: 19 November 2003
Online Status: Offline Posts: 2206
|
Posted: 15 March 2010 at 11:42am | IP Logged
|
|
|
People keep asking this, here it is:
Code:
var
...
arrSearchResults: OleVariant;
strUID: string;
I: integer;
begin
...
arrSearchResults := objPOP3.Search();
for I := VarArrayLowBound(arrSearchResults, 1) to VarArrayHighBound(arrSearchResults, 1) do
begin
strUID := arrSearchResults;
end;
|
|
|
Regards,
Alex
|
Back to Top |
|
|