× Lab CT Version, news, test results, new features request and suggestions

Question CT LAB ver 7.20

  • Sternas Stefanos
  • Sternas Stefanos's Avatar Topic Author
  • Offline
  • Moderator
  • Moderator
  • Ex Pilot, M.Sc, Ph.D
More
1 month 1 week ago #14824 by Sternas Stefanos
Replied by Sternas Stefanos on topic CT LAB ver 7.20
1) Just replace
/usr/local/codetyphon/typhon/components/pl_Synapse/source/synaser.pas

with new from .zip file

2) Yes Embedded Form Designer NOT supported on MacOS yet

PilotLogic Architect and Core Programmer
Attachments:

Please Log in or Create an account to join the conversation.

More
1 month 1 week ago #14825 by Dean Qin
Replied by Dean Qin on topic CT LAB ver 7.20
thanks, compiled, but cannot run because unversioned libcrypto.dylib exception

I modified ssl_openssl_lib.pas of Synapse -- add a version to crypto & ssl filename, works fine now.

Please Log in or Create an account to join the conversation.

More
1 month 1 week ago #14826 by Gyula Kampfner
Replied by Gyula Kampfner on topic CT LAB ver 7.20
Hi,
the following code doesn't work in CodeTyphon, it spits out an error 'Connection to portal.1nce.com:443 failed', but it does work in Lazarus. The ssl libraries are installed, and I can connect to https websites except for this one. I tried debugging the fphttpclient unit, and the exception fires at line 624, which is FSocket.Connect; in TFPCustomHTTPClient.ConnectToServer procedure. I'm stuck here. Any suggestion how to fix this?
procedure TForm1.Button1Click(Sender: TObject);
var
  SMSGTW: TFPHTTPClient;
  s,authStringEnc: String;
begin
  SMSGTW:=TFPHTTPClient.Create(nil);

  s:='username:password';
  authStringEnc:=EncodeStringBase64(s);

  SMSGTW.AddHeader('Accept', 'application/json');
  SMSGTW.AddHeader('Content-Type', 'application/x-www-form-urlencoded');
  SMSGTW.AddHeader('Authorization',  'Basic '+authStringEnc);

  try
     s:=SMSGTW.FormPost('https://portal.1nce.com/management-api/oauth/token','grant_type=client_credentials');
     Log.Append(s);
     ShowMessage(s);
  except
     on E: Exception do
        ShowMessage(E.Message);
     else raise;
  end;

  SMSGTW.Free;
end;

Please Log in or Create an account to join the conversation.

  • Sternas Stefanos
  • Sternas Stefanos's Avatar Topic Author
  • Offline
  • Moderator
  • Moderator
  • Ex Pilot, M.Sc, Ph.D
More
1 month 1 week ago #14827 by Sternas Stefanos
Replied by Sternas Stefanos on topic CT LAB ver 7.20
Please Sir
give us a sample project with the problem
Your OS and CT ver ?

PilotLogic Architect and Core Programmer

Please Log in or Create an account to join the conversation.

More
1 month 1 week ago #14828 by Gyula Kampfner
Replied by Gyula Kampfner on topic CT LAB ver 7.20
Windows 10 64 bit, ct 7.1. I'm out of office now so i cannot send a project now, but what i sent is the problematic part. Just run it from a button click event. Thank you :)

Please Log in or Create an account to join the conversation.

More
1 month 1 week ago #14831 by Gyula Kampfner
Replied by Gyula Kampfner on topic CT LAB ver 7.20
Here is my sample project:

File Attachment:

File Name: fphttp.zip
File Size:536 KB
Attachments:

Please Log in or Create an account to join the conversation.

More
1 month 1 week ago - 1 month 1 week ago #14832 by Matis A.
Replied by Matis A. on topic CT LAB ver 7.20
Thanks Sir
all work OK here

We just copy from C:\codetyphon\binRuntimes\i386-win32\ folder
to your executable folder
the libraries:
libeay32.dll
libssl.dll
ssleay32.dll

CodeTyphon has the correct Runtimes Libraries at codetyphon\binRuntimes


PilotLogic Core Programmer
Attachments:
Last edit: 1 month 1 week ago by Matis A..

Please Log in or Create an account to join the conversation.

More
1 month 1 week ago #14833 by Gyula Kampfner
Replied by Gyula Kampfner on topic CT LAB ver 7.20
Thanks, it works :)

Please Log in or Create an account to join the conversation.

More
1 month 6 days ago #14837 by Fernando
Replied by Fernando on topic CT LAB ver 7.20
Hi,
I got a strange problem with pl-fpspreadsheet. Please see the attached project, compile and run. Click on the button at the top left. A child window with a TsSpreadsheetGrid opens.
Write something on cell A1, then press Enter; the text disappears. Then press enter again (this time should be in cell A2), the test appears there.
Apparently, in a main window this problem does not happen.

Windows 10 x64
Typhon 7.2 r2006190435 FPC 3.3.1 r2006190435 Platform : x86_64-win64-win32/win64
Attachments:

Please Log in or Create an account to join the conversation.

More
1 month 5 days ago #14839 by Matis A.
Replied by Matis A. on topic CT LAB ver 7.20
I think it's TsSpreadsheetGrid problem
we will try to solve this

PilotLogic Core Programmer

Please Log in or Create an account to join the conversation.

More
1 month 5 days ago #14840 by Fernando
Replied by Fernando on topic CT LAB ver 7.20
Thank you! The TsSpreadsheetGrid demos work well, but these are "normal" windows; this is why I think it may be related to the grid being in a child window.

Please Log in or Create an account to join the conversation.

More
4 weeks 1 day ago #14850 by LuZZZZi
Replied by LuZZZZi on topic CT LAB ver 7.20
Hi,

I'm trying to use the unit "ChooseClassSectionDlg" from the Typhons ide path. But the compiler told me that it can't find the TInsertClassSectionResult class. Do you know where I can find it.

Thx for help.

Please Log in or Create an account to join the conversation.

More
4 weeks 23 hours ago #14852 by LuZZZZi
Replied by LuZZZZi on topic CT LAB ver 7.20
Hi,

another issue in ChooseClassSectionDlg.

lisChooseClassSectionDlgForMethodCaption = 'Insert new method to section'; is not available in ct_IDEStrConsts and
EnvironmentOptions.LastEventMethodSectionPrompt is also not available.

Thx

Please Log in or Create an account to join the conversation.

More
4 weeks 21 hours ago - 4 weeks 21 hours ago #14856 by Matis A.
Replied by Matis A. on topic CT LAB ver 7.20
Thanks Sir
we must remove chooseclasssectiondlg.pas it's useless

PilotLogic Core Programmer
Last edit: 4 weeks 21 hours ago by Matis A..

Please Log in or Create an account to join the conversation.

More
3 weeks 3 days ago #14877 by LuZZZZi
Replied by LuZZZZi on topic CT LAB ver 7.20
The next issue I found in dbgintfdebuggerbase.

There is a set which can't cast to Integer. See picture



What is the solution for that?

Thx for help.
Attachments:

Please Log in or Create an account to join the conversation.

  • Sternas Stefanos
  • Sternas Stefanos's Avatar Topic Author
  • Offline
  • Moderator
  • Moderator
  • Ex Pilot, M.Sc, Ph.D
More
3 weeks 3 days ago #14878 by Sternas Stefanos
Replied by Sternas Stefanos on topic CT LAB ver 7.20
Replace
Integer with PtrInt or PtrUInt

Integer(xxx) work only on 32Bit Pascal.

CT as leading Programming Studio use THE latest Object Pascal.

PilotLogic Architect and Core Programmer

Please Log in or Create an account to join the conversation.

More
3 weeks 2 days ago #14885 by LuZZZZi
Replied by LuZZZZi on topic CT LAB ver 7.20
I have tried your advice but the issue persists.

dbgintfdebuggerbase.pp(6163,46) Error: Illegal type conversion: "TDBGEvaluateFlags" to "Int64"

Thx

Please Log in or Create an account to join the conversation.

  • Sternas Stefanos
  • Sternas Stefanos's Avatar Topic Author
  • Offline
  • Moderator
  • Moderator
  • Ex Pilot, M.Sc, Ph.D
More
3 weeks 2 days ago - 3 weeks 2 days ago #14886 by Sternas Stefanos
Replied by Sternas Stefanos on topic CT LAB ver 7.20
Sir, send as the source and we will try to help you

We don't know
what is TDBGEvaluateFlags and what is RegCmd

Will general instructions we can help you

PS: we remove chooseclasssectiondlg.pas from LAB CT

PilotLogic Architect and Core Programmer
Last edit: 3 weeks 2 days ago by Sternas Stefanos.

Please Log in or Create an account to join the conversation.

  • Sternas Stefanos
  • Sternas Stefanos's Avatar Topic Author
  • Offline
  • Moderator
  • Moderator
  • Ex Pilot, M.Sc, Ph.D
More
2 weeks 5 days ago #14899 by Sternas Stefanos
Replied by Sternas Stefanos on topic CT LAB ver 7.20
We release LAB CodeTyphon ver 7.20 revision 007150
Please test, report and always
have fun....

PilotLogic Architect and Core Programmer

Please Log in or Create an account to join the conversation.

More
2 weeks 5 days ago - 2 weeks 5 days ago #14900 by Matis A.
Replied by Matis A. on topic CT LAB ver 7.20
A lot of work in our LAB for CT Revision 007150
with the Covid-19 problems...

Next month it's holiday period for some LAB CORE-Programmers
(Mr Sternas must stay here to clean up the LAB :P )

We welcome 4 new CT Programmers to Our LAB for learning and Help.
They are new to our Pascal World... but they are very promising people.

PilotLogic Core Programmer
Last edit: 2 weeks 5 days ago by Matis A..

Please Log in or Create an account to join the conversation.