Independientemente de los motivos por los que has decidido usar la API directamente, el principal problema está en la declaración de la función que quieres ejecutar en el hilo. No puede ser un procedimiento sino una función y debe ser
stdcall:
Código Delphi
[-]function MiFuncion(Param: PCHAR): DWORD; stdcall;
begin
MessageBox(0, 0, Param, 0);
Result := 0;
end;
procedure TForm1.FormCreate(Sender: TObject);
var
ID : Cardinal;
s : String;
begin
s := 'hola';
CreateThread(nil, 0, @MiFuncion, PCHAR(s), 0, ID);
end;
Saludos.