pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

JNI example: Small improvements

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@2166 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
sekelsenmat
2011-11-27 08:51:47 +00:00
parent 694f02d26c
commit b018630e7f
2 changed files with 3 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
bindings/android-ndk/examples/jnitest/jni/nativetest.lpi
View File

@ -56,10 +56,6 @@
<TargetOS Value="linux"/> <TargetOS Value="linux"/>
</CodeGeneration> </CodeGeneration>
<Linking> <Linking>
<Debugging>
<GenerateDebugInfo Value="False"/>
<UseLineInfoUnit Value="False"/>
</Debugging>
<Options> <Options>
<ExecutableType Value="Library"/> <ExecutableType Value="Library"/>
</Options> </Options>

5
bindings/android-ndk/examples/jnitest/jni/nativetest.pas
View File

@ -4,8 +4,8 @@ library nativetest;
uses uses
SysUtils, SysUtils,
jni in 'jni.pas', jni,
log in 'log.pas'; log;
const curClass:JClass=nil; const curClass:JClass=nil;
nativeCodeLoaded:JfieldID=nil; nativeCodeLoaded:JfieldID=nil;
@ -36,6 +36,7 @@ begin
exit; exit;
end; end;
__android_log_write(ANDROID_LOG_INFO,'nativetest','Reading curClass');
curClass:=curEnv^.FindClass(curEnv,'com/pascal/jnitest/AndroidJNITest'); curClass:=curEnv^.FindClass(curEnv,'com/pascal/jnitest/AndroidJNITest');
if not assigned(curClass) then begin if not assigned(curClass) then begin
__android_log_write(ANDROID_LOG_FATAL,'nativetest','curEnv^.FindClass failed'); __android_log_write(ANDROID_LOG_FATAL,'nativetest','curEnv^.FindClass failed');