小编Gab*_*Gab的帖子

我正在尝试创建一个编辑框,我希望它能够在输入时自动附加输入的文本.文本将附加文本文件中的"建议".

假设我的建议文件中有这些:Marilyn Monroe Marlon Brando Mike Myers

当我开始在编辑框中输入"M"时,剩余部分会突出显示(或不显示):"arilyn Monroe"当我一直输入"Mi"时,"ke Myers"会出现在最后.我希望我能为你们清楚地说明这一点!谢谢你的帮助!

我正在尝试使用2个分隔符从文本文件中提取字符串.一个开始,一个停止.

例:

Hi my name is$John and I'm happy/today

我需要做的是调用,将返回的字符串的函数$和/.我一直在寻找各处,但我似乎找不到有用的东西,我是编程的新手.

我想知道是否有更好的方法从网页中提取信息,而不是解析我正在搜索的HTML.即:从'imdb.com'中提取电影评级

我目前正在使用IndyHttp组件来获取页面,我正在使用strUtils来解析文本,但内容有限.

我每隔x秒尝试执行一个函数(或过程).

我一直在寻找各处,但似乎从来没有找到适合我需要的东西.

我的应用程序基本上从网上获取数据,我想制作一个自动刷新复选框.所以让我们说用户选中该框,我希望应用程序每隔5秒调用一次该功能.

谢谢!

好的,我一直试图找出我正在制造的每一个可能的错误,但我放弃......我需要帮助!我正在写的是一个应用程序来管理我的工作租金,当日期过去时,我的应用程序从2个文本文件中删除名称.我编写了3个小函数(程序)来完成这项工作.这里:

这个从dates.dat文件加载并删除包含该员工姓名的行.

procedure remDate(emp: String);/// Removes employee from date file
var
  pos1, i: integer;
  dateList: TStringList;
begin
  dateList:=TStringList.Create;
  dateList.LoadFromFile('Data\dates.dat');
  for i:=0 to dateList.Count-1 do begin
    pos1:=AnsiPos(emp, dateList[i]);
    if pos1<>0 then begin
      dateList.Delete(i);
      dateList.SaveToFile('Data\dates.dat');
    end;
  end;
  dateList.Free;
end; //eo remDate

这个从perm.dat文件中删除包含员工姓名的行.

procedure remPerm(emp: String);/// Removes employee from perm file
var
  pos1, i: integer;
  permList: TStringList;
begin
  permList:=TStringList.Create;
  permList.LoadFromFile('Data\perm.dat');
  for i:=0 to permList.Count-1 do begin
    pos1:=AnsiPos(emp, permList[i]);
    if pos1<>0 then begin
      permList.Delete(i);
      permList.SaveToFile('Data\perm.dat');
    end;
  end;
  permList.Free;
end; //eo remPerm

这个把它们粘在一起.isDue是一个简单的函数,它比较2个日期,如果日期是今天或过去,则返回TRUE.

procedure updatePerms; …

我正在制作一个小程序,在我们供应商的网站上下订单.我需要填写页面中的3个字段.甚至不需要"提交"它.

是否有任何简单的方法或任何组件可以做到这一点(最好免费)

谢谢!

我还是初学者,我一直试图通过自己来解决这个问题,但我想我运气不好.我认为这可能很简单,但这是交易.

我有3个复选框.当按下按钮但是没有选择时,每个都在文本文件中写入特定行.我想要显示一条消息.但是,即使选中了一个复选框,也会弹出消息.这是代码:(顺便说一句,随意建议任何其他代码,使其更容易/更清晰)

if cbSCV.Checked then
  WriteLn(permFile, 'scv');
if cbMP.Checked then
  WriteLn(permFile, 'mp');
if cbBTK.Checked then 
  WriteLn(permFile, 'btk'); 
if not (cbBTK.Checked) and not (cbMP.Checked) and not (cbBTK.Checked) then
  showmessage('Choose at least 1 option.');

我正在构建一个软件来处理网站上的订单.我正在使用DOM浏览网站,当我在"错误"页面上使用命令时,我希望我的应用程序不会挂起.

例如:

try
  WebBrowser.OleObject.Document.GetElementByID('ContentPlaceHolder1_txtCommande').setAttribute('value', lblDate.Caption);
except
end;

我想要的只是在找不到该字段时忽略该错误,因为此错误并不重要.谢谢!

编辑:当我的意思是DOM时写了ADO

我在我创建的名为submit的程序中得到了"Undeclared identifier".

procedure submit;
begin
if ebMain.Text='exit' then
fmMain.Close;
end;

真的很简单.编译器告诉我ebMain是未声明的.我可以通过添加"fmMain"来解决这个问题.在它前面,但我从来没有在delphi 7中这样做.编辑框(ebMain)在主窗体上(fmMain).过程标题位于"使用"下方.怎么了？