daily pastebin goal
4%
SHARE
TWEET

Untitled

a guest Mar 13th, 2018 55 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. const
  2.   szPluginName     = 'Plugin Example';
  3.  
  4. function PluginInit: PAnsiChar; export; stdcall;
  5. var
  6.   Buf: string;
  7. begin
  8.   try
  9.     Buf := szPluginName;
  10.     if Length(Buf)<>0 then
  11.     begin
  12.       GetMem(Result, Length(Buf)+1);
  13.       lstrcpy(Result, @Buf[1]);
  14.     end else
  15.       Result := '';
  16.   except
  17.     Result := '';
  18.   end;
  19. end;
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
 
Top