TOPIC:

If I call

inStr := InputBox('Error Test','Please type any string..');


then it raised an exception error.

I checked CT 6.6 and 6.8. I experience the same exception error.

Thanks Sir

InputBox function has 3 input const ACaption, APrompt, ADefault

unit Dialogs
....
function InputBox(const ACaption, APrompt, ADefault : String) : String;
....

so the correct code is :

inStr :=:= InputBox('Error Test','Please type any string..','DEFAULT INPUT OR NOTHING');

For the Win32 Build and Linux build, my codes don't raise the exception error. It only happens with the build for the raspberry pi 1. why is that?
Thanks in advance.

unit Dialogs is common to ALL OSes
the same and InputBox function

This is my code.

procedure TForm1.Button1Click(Sender: TObject);
var str : String;
begin
str := InputBox('Input Test', 'Type your string!', 'Test');
ShowMessage(str);
end;

I tried arm-linux-RapberryPi compiler when I made the environment. And this is output.


I tried arm-linux compiler when I made the environment. And this is the output.


Any suggestions?

Thanks Sir
your CT version ?

I was building for the raspberry pi and using 6.8, 6.7, 6.6 and 6.5.
I saw this at 6.8, 6.7 and 6.6.

Sir
we test on Pi3 with Ubuntu-Mate-arm64
and LAB CodeTyphon 6.90
without any problem.

It looks like older raspberry-pi is not supported.
Good to know and I will upgrade my system to the raspberry-pi3.
Thanks.