Delphi 多线程传递参数的问题

Delphi 多线程传递参数的问题unituThread interfaceuse typeTh class TThread private Privatedecla protectedpro override end 以上是创建的一个多线程我在另外一个单元里 Unit1 有一个函数 functionMyfu username password string boolean 现在要

unit uThread; interface uses Classes; type Th = class(TThread) private { Private declarations } protected procedure Execute; override; end;

复制代码

function Myfun(username,password:string):boolean

解决方法如下:

复制代码

// 线程类 unit Unit2; interface uses Classes; type TMyThread = class(TThread) private FUserName: string; FPassWord: string; FFlag: Boolean; procedure GetUserName(const 
版权声明:本文内容由互联网用户自发贡献,该文观点仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请联系我们举报,一经查实,本站将立刻删除。

发布者:全栈程序员-站长,转载请注明出处:https://javaforall.net/230054.html原文链接:https://javaforall.net

(0)
上一篇 2026年3月16日 下午3:14
下一篇 2026年3月16日 下午3:14


相关推荐

发表回复

您的邮箱地址不会被公开。 必填项已用 * 标注

关注全栈程序员社区公众号