もう13時か、
2ちゃんねる ■掲示板に戻る■ 全部 1- 最新50 [PR]FLASHゲームコミュニティー「モゲラ」[PR]  

2chBrowser OpenJane@Win板 Part21

113 :名無し~3.EXE:2009/07/07(火) 08:49:04 ID:0K2BjABs
何か変だと思ったらD6のAnsiEndsTextアホすぐる。。。
Length(AText) < Length(ASubText)の時点でResult :=Trueで終了する

//Patchしませう
function AnsiEndsTextEx(const ASubText, AText: string): Boolean;
var
L: Integer;
begin
Result := False;
if ASubText = '' then exit;
L := Length(AText) - Length(ASubText) + 1;
if L <= 0 then exit;
if ByteType(AText, L) = mbTrailByte then exit;
Result := AnsiStrIComp(Pointer(ASubText), Pointer(@AText[L])) = 0;
end;

40 KB [ 2ちゃんねる 3億PV/日をささえる レンタルサーバー \877/2TB/100Mbps]

取りに行ったけどなかった。次は一時間後に取りに行くです。
新着レスの表示

掲示板に戻る 全部 前100 次100 最新50
名前: E-mail (省略可) :


read.cgi ver 05.0.7.8 2008/11/13 アクチョン仮面 ★
FOX ★ DSO(Dynamic Shared Object)