Delphi未声明的字符串 [英] Delphi undeclared string

问题描述

你好，



我真的需要一些帮助我急需一个解决方案！



我有一个离线消息表格/单位。



它不允许我编译



完整代码在这里： http://beyluxe.googlecode.com/svn/trunk/mine/OfflinesUnit.dcu [ ^ ]



我收到以下错误：

Hello,

I really need some help i am desperate for a solution!

I have a offline messenging form/unit.

It will not allow me to compile

The FULL Code is here: http://beyluxe.googlecode.com/svn/trunk/mine/OfflinesUnit.dcu[^]

I get the following errors:

Build
  [Error] OfflinesUnit.pas(103): Undeclared identifier: 'LoadString'
  [Error] OfflinesUnit.pas(142): Undeclared identifier: 'LoadString'
  [Fatal Error] MainUnit.pas(480): Could not compile used unit 'OfflinesUnit.pas'

Error 1:

procedure TOfflinesForm.FormShow(Sender: TObject); var   i: Integer;   PMText: string; begin   for i := 0 to OfflineList.Count - 1 do   begin     OfflineListView.Items.Add;     OfflineListView.Items.Caption := OfflineSenders.Strings;     OfflineListView.Items.SubItems.Add(OfflineList.Strings);      Viewer.LoadString(PChar(OfflineList.Objects),'',HTMLType);     Viewer.SelectAll;     PMText := Viewer.SelText;     Viewer.SelLength := 0;     Viewer.Clear;     OfflineListView.Items.SubItems.Add(PMText);   end; end;

Error 2:

procedure TOfflinesForm.SendTextToViewer(User, Text: string;   UserColor: TColor); var   Str: string; begin   Str := '<font size=0 color=#'+IntToHeWebColor(BUDDYNICKCOLOR),8)+'>'+User+':</font> ';   Str := Str + ReplaceSmilesText(' '+Text); //  Str := CorrectHTMLLinks(Str);   Viewer.LoadString(Str,'',HTMLType);   Viewer.VScrollBarPosition := Viewer.VScrollBar.Max;   Viewer.Invalidate; end;

很抱歉，如果它看起来很奇怪，我不习惯在这里使用代码标签！我很新！



我尝试过的事情：



我没有尝试过很多，因为我没有做太多的知识！



我不知道如何解决这个问题。

Sorry if it looks weird, im not used to using code tags here! I'm New!

What I have tried:

I haven't tried an awful lot as i don't have the knowledge to do much!

I have no idea how to fix this.

推荐答案

引用：

我没有尝试过很多，因为我没有知识做多了！

I haven't tried an awful lot as i don't have the knowledge to do much!

没有太多可尝试的，阅读错误信息。

There is not much to try, read the error message.

[Error] OfflinesUnit.pas(103): Undeclared identifier: 'LoadString'
[Error] OfflinesUnit.pas(142): Undeclared identifier: 'LoadString'

它告诉你 LoadString 不存在，未知。检查 THTMLViewer 对象中是否存在什么问题应该不成问题，即使对于初学者也是如此。如果您编写了代码，那么理解错误应该并不复杂。



编译器会告诉您哪里出错了以及出了什么问题。利用错误消息也是一种技巧。

顺便说一句，源代码位于 http://beyluxe.googlecode.com/svn/trunk/mine/OfflinesUnit.pas [ ^ ]

It tells you that LoadString do not exist, is unknown. Should not be a problem to check if what exist in a THTMLViewer object, even for a beginner. If you writed the code, it should not be complicated to understand what is wrong.

The compiler tells you what is wrong and where. Taking advantage of error messages is also a skill.
By the way the source code is in http://beyluxe.googlecode.com/svn/trunk/mine/OfflinesUnit.pas[^]

@ppolymorphe你可以通过skype帮助我吗？

@ppolymorphe could you help me via skype ?

这篇关于Delphi未声明的字符串的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！