Dudas con Threads en Delphi

[[escafandra]]

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.