小编con*_*rbp的帖子

好吧,所以我试图将一个字符串的键击和编辑框发送到活动窗口和之后的回车键.有没有人知道在delphi 7中这样做的工作方法？

我一直在搜索大约一个半小时,我似乎找不到任何东西,我发现的东西是以太新版本的delphi,或者它只是不起作用.我尝试过TTouchKeyboard,但这只适用于delphi 10和更新版本.

我正在尝试制作一个聊天应用程序,将消息发布到以下形式的备忘录中:

USERNAME-> Message

但它是这样发布到我的备忘录:

USERNAME

这是我的代码:

const
  cnMaxUserNameLen = 254;
var
  sUserName: string;
  dwUserNameLen: DWORD;
  text : string;
begin
  dwUserNameLen := cnMaxUserNameLen - 1;
  SetLength(sUserName, cnMaxUserNameLen);
  GetUserName(PChar(sUserName), dwUserNameLen);
  SetLength(sUserName, dwUserNameLen);

  text:= sUserName + '-> ' + edit1.Text;
  memo1.Lines.Add(text);

有关如何解决它的任何建议？

我在查找Delphi组件以查找包含某些信息的项目时遇到问题,就像Windows文件浏览器一样.

是否有一个组件可以用来列出名称和有关它们的信息,例如explorer.exe可能吗？我正在尝试制作一个俱乐部会员管理计划,所以我希望能够列出会员名称和基本信息,然后当点击名称时,它会进入更详细的信息.

如果有一个组件可以列出explorer.exe的方式,那么请告诉我.

我想在Delphi中制作货币转换器,自从我上次使用Delphi以来已经有一段时间了,所以我有点生疏了.当我试图创建一个if,else if,else语句时,它给出了错误:"表达式必须是BOOLEAN".

这是我的代码:

if Edit1.Text = '' And Edit2.Text <> ''
    then Edit2.Text := '1'
else
if Edit1.Text <> '' And Edit2.Text = ''
    then ShowMessage('Blah')
else
if Edit1.Text ='' And Edit2.Text = ''
    then ShowMessage('Please Enter A Value')
else
    ShowMessage('Mathing Suff...');

如果有人能看到我的愚蠢错误或出了什么问题会对你有所帮助.:)

编辑:错误在第一个if语句的行上弹出,而另外两个if在它之后.

我试图在我的代码中将布尔变量(curs)设置为false但我收到此错误:

[错误] Main.pas(50):不兼容的类型

有谁知道这意味着什么？

if form1.Left = pt.X and form1.Top = pt.Y
then curs := false;

如果您对所发生的事情了解或有任何想法,请随时分享.:) 谢谢

-connorbp