Typecast Text to LPARAM

How do I typecast text to LPARAM? LPARAM is supposed to be an integer, but clearly the API call wants text. I'm assuming I missed some pchar>string or pointer stuff, but haven't been able to figure out what exactly I am missing. Here is my code:

MyMSG1: TMSG;
Stringtofind: pchar;

begin

Stringtofind:='I am a string!';


with mymsg1 do
begin
message:=lb_findstring;
wparam:=-1;
lparam:=stringtofind; <= ERROR
end;

Answer:

Actually, it's simpler than that. Just typecast the variable as a LongInt:

lParam := LongInt(StringToFind);