首页编程dephi(dephi中的函数findtext())

dephi(dephi中的函数findtext())

编程之家2023-11-0294次浏览

亲爱的读者们,你是否对dephi和dephi中的函数findtext()的关系感到好奇?在本文中,我将深入探讨它们之间的联系,让你对此有更深刻的理解。

dephi(dephi中的函数findtext())

dephi中的函数findtext()

function FindText(const SearchStr: string; StartPos, Length: Integer; Options: TSearchTypes): Integer;

FindText函数可以在一段文件中搜索特定的字符串(由参数SearchStr给出),StartPos参数表示搜索的起始位置,Length参数指定从起始位置起搜索的长度. Options参数指定是否全字匹配或者区分大小写,是一个集合参数,元素有stWholeWord和stMatchCase。FindText函数返回搜索的字符串在字符串中的位置。如果字符串找不到,那么返回值是-1。

例如:(假如RichEdit1中已经有文本,在界面上放置一个FindDialog)

procedure TForm1.FindDialog1Find(Sender: TObject);

var

FoundAt: LongInt;

dephi(dephi中的函数findtext())

StartPos, ToEnd: Integer;

begin

with RichEdit1 do

begin

{ begin the search after the current selection if there is one}

{ otherwise, begin at the start of the text}

dephi(dephi中的函数findtext())

if SelLength<> 0 then

StartPos:= SelStart+ SelLength

else

StartPos:= 0;

{ ToEnd is the length from StartPos to the end of the text in the rich edit control}

ToEnd:= Length(Text)- StartPos;

FoundAt:= FindText(FindDialog1.FindText, StartPos, ToEnd, [stMatchCase]);

if FoundAt<>-1 then

begin

SetFocus;

SelStart:= FoundAt;

SelLength:= Length(FindDialog1.FindText);

end;

end;

end;

Pascal和delphi有什么区别

楼上不完全正确

首先

Delphi和pascal都是完整的IDE

不存在包含与被包含的关系

其次

这两者仅仅是语法相同

不存在谁是谁的可视化。。。

Delphi是参照pascal的语法建立的可视化开发环境,pascal是非可视化的

虽然pascal也支持面向对象,但功能很弱

Delphi加强了面向对象方面的功能

而且,Delphi在数据库方面有很大用处

目前pascal除了信息学竞赛

已经没有任何使用价值

不过,作为一门教学语言,还是很值得学习的

delphi与VB相比,优缺点是什么

优点:

开发速度比VB快不知多少倍,控件多,功能也多,从底层,网络,到移动平台的开发,Delphi都能胜任。众所周知的,VB不能开发底层应用,也不能开发手机,更不能做linux程序,而delphi都能做到。

缺点:

Delphi操作起来比VB复杂得多,编译出来东西非常巨大。并且Delphi的开发思想与微软的那些工具都不一样,可能会很不习惯

非常感谢您的阅读!我们希望本文对于解决您关于dephi的问题提供了一些有价值的信息。如果您还有其他疑问,我们将很乐意为您提供进一步的帮助。

高端网站开发 如何定义高端的网站定制开发制作官网?如何建立官方网站