Knowledgeable People, help solve the problem in Delphi

 

v20240901