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;
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}
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的问题提供了一些有价值的信息。如果您还有其他疑问,我们将很乐意为您提供进一步的帮助。