[DELPHI/JAVA] Passaggio parametri funzione con JNI

[perzem]

ho creato questa funzioncina delphi che passata un stringa come parametro me la modifica e la ritorna. Non voglio usare una function perche poi devo aggiungere altri parametri di tipi diversi da farmi ritornare

x:String='cio';
procedure Java_Ppt_GetSlide(PEnv: PJNIEnv; Obj: JObject;var title:JString; var keys:JString); stdcall;
begin
   title:=JString(x);
end;
exports Java_Ppt_GetSlide;

la richiamo in java con la Jni (procedimento corretto testato con altri metodi)ma non mi modifica la stringa passata, cioè lascia il valore che gli ho assegnato in java cioè "c"

native public void GetSlide(String title, String keys);
   static
  {
    System.loadLibrary("PptDLL");
  }

String title1="c";
int keys=2;
   GetSlide(title1,keys);
jTFtitolo.setText(title1);

dove ho sbagliato??