如何判断Memo控件的内容是否为空?初学者的菜问题,先来先领分。 if Memo1.Text = '' then 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 if memo1.Lines.Count=0 then showmessage('空');pchar->string strpas(p:pchar)string->pchar pchar(s:string) Trim() //去左右不可见字符 if Trim(Memo1.Text) = '' then //空格空行都不算Pos() //子串位置 if Pos('1', Memo1.Text) > 0 then //有"1"Copy() //取子串 Copy(Memo1.Text, 1, 1) //第一个字符Length() //取长度 Length(Memo1.Text) //文本长度StringReplace() //替换子串 StringReplace(Memo1.Text, #13#10, ';', [rfReplaceAll]) //把换行替换成";" var P: PChar; //和array[0..Size] of Char;//相近 S: string;begin//.... P := PChar(S); //强制转换//.... S := P; //直接赋值{单独使用PChar时用GetMem()分配资源,用FreeMem()释放资源}end;(*StrToInt()StrToFloat()StrToDate()StrToBool()*) 请问D7中的一个函数怎么用到2010上 dephi中为什么执行不了select语句 请问返回数据集的函数返回类型该怎么声明 ? 如何在运行时创建一个InterBase数据库???? 当数据库的触发器执行时,如何使程序得知(即给予前台的使用者一定的提示) 谁有写股票系统的资料,我的毕业设计要写一个模拟股票系统.......可否发给我 动态创建报表中碰到了一个问题 如何快速的将1个jpg文件,切割成多个文件? 能使flash和delphi交互吗?我不知道怎么做?谢谢 计算字段可不可以用统计字段统计??? 总和不是**分,那我到底给了多少分? 有没有人用Delphi做过Web开发?
pchar->string strpas(p:pchar)
string->pchar pchar(s:string)
if Trim(Memo1.Text) = '' then //空格空行都不算
Pos() //子串位置
if Pos('1', Memo1.Text) > 0 then //有"1"
Copy() //取子串
Copy(Memo1.Text, 1, 1) //第一个字符
Length() //取长度
Length(Memo1.Text) //文本长度
StringReplace() //替换子串
StringReplace(Memo1.Text, #13#10, ';', [rfReplaceAll]) //把换行替换成";"
P: PChar; //和array[0..Size] of Char;//相近
S: string;
begin
//....
P := PChar(S); //强制转换
//....
S := P; //直接赋值
{单独使用PChar时用GetMem()分配资源,用FreeMem()释放资源}
end;(*
StrToInt()
StrToFloat()
StrToDate()
StrToBool()
*)