[[ppb]]

Prueba el cast o la segunda manera

Código Delphi [-]
 
// CAST 
Var  
  pantalla : String;  
  longitud : integer;
Begin      

  captura_pantalla(1,Pchar(pantalla),longitud,0);    ........
 
// Mover datos 
Var  
  pantalla : Pchar;  
  Buffer    : Array [0..???] Of char;  
  longitud : integer;  
  s : String;
Begin   
 
  pantalla := @Buffer;    
   captura_pantalla(1,pantalla,longitud,0);  
 
  SetLength(s, longitud );  

  s:=buffer;   
 
  ........