Get Variables in a Tmemo Object that resides between to parts of text
$30-50 USD
Terminado
Publicado hace casi 19 años
$30-50 USD
Pagado a la entrega
I would need a function that is defined as following:
Function GetMyVar(MemoID: Tmemo; PreText: String; PostText: String): String;
The function should retrieve a value contained between two
portions of the Tmemo text.
For instance, the following statement:
Shomessage(GetMyVar(tmemo1,'lotid=', ';#'));
Applied to the following contents of tmemo1:
// TMEMO CONTENT START
<td class="smalltext" align="left" width="23%"><a href="/cgi-bin/auk?cmd=obs;OrderBy=CloseTime;SortOrder=1;list_flag=1039;lng=de;lotid=382537615;#url=%2Fcgi-bin%2Fauk%3Fcmd%3Dviewcat%3BOrderBy%3DCloseTime%3BSortOrder%3D1%3Bcatid%3D130001308%3Blist_flag%3D1039%3Blng%3Dde%3Blotid%3D382537615%3B;">
Auktion beobachten</a></td>
// TMEMO CONTENT END
should return: 382537615
## Deliverables
1) Complete and fully-functional working program(s) in executable form as well as complete source code of all work done.
## Platform
Source Code should be DELPHI VCL32 2005