Source position: vdi.pas line 41
procedure vdi_str_to_pchar(
src: psmallint;
des: pchar;
len: SmallInt
);