paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-25 23:40:06 +02:00
Code Issues Packages Projects Releases Wiki Activity

Removes some forgotten debugln

Browse Source 
git-svn-id: trunk@35294 -
This commit is contained in:
sekelsenmat 2012-02-10 15:16:30 +00:00
parent 577822049d
commit 83e909a612
1 changed files with 0 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lcl/interfaces/customdrawn/customdrawnwslazdeviceapis.pas
View File

@ -194,12 +194,10 @@ begin
// Get the vibrator object
// Vibrator v = (Vibrator) getSystemService(Context.VIBRATOR_SERVICE);
DebugLn('3');
lParams[0].l := javaString_VIBRATOR_SERVICE;
lVibratorObject := javaEnvRef^^.CallObjectMethodA(javaEnvRef, javaActivityObject, javaMethod_getSystemService, @lParams[0]);
// Now call the method from the vibrator object
DebugLn('4');
lParams[0].j := ADurationMS;
javaEnvRef^^.CallVoidMethodA(javaEnvRef, lVibratorObject, javaMethod_Vibrate, @lParams[0]);
end;