{
ShitarabaJBBSPlugIn
- $Id: ShitarabaJBBSPlugIn.dpr,v 1.45 2008/08/03 02:45:48 h677 Exp $
+ $Id: ShitarabaJBBSPlugIn.dpr,v 1.46 2008/12/20 04:02:40 h677 Exp $
}
uses
MAJOR_VERSION = 1;
MINOR_VERSION = 1;
RELEASE_VERSION = 'alpha';
- REVISION_VERSION = 17;
+ REVISION_VERSION = 18;
SYNCRONIZE_MENU_CAPTION = '\82µ\82½\82ç\82ÎJBBS\94Â\8dX\90V';
tmpLine := AnsiLowerCase(tmpHTML[i]);
tS := AnsiPos('<a href="mailto:', tmpLine);
if tS > 0 then begin //\83\81\83\8b\97\93\83A\83\8a
- tE := AnsiPos('">', tmpLine);
- tmpDatToken[2] := Copy(tmpHTML[i], tS + 16, tE - (tS + 16));
- tmpHTML[i] := Copy(tmpHTML[i], tE + 5, Length(tmpHTML[i]));
- tmpHTML[i] := CustomStringReplace(tmpHTML[i], '</a>', '', true);
- end else begin //\83\81\83\8b\97\93\96³\82µ
+ tE := AnsiPos('">', tmpLine);
+ tmpDatToken[2] := Copy(tmpHTML[i], tS + 16, tE - (tS + 16));
+ tmpHTML[i] := Copy(tmpHTML[i], tE + 5, Length(tmpHTML[i]));
+ tmpHTML[i] := CustomStringReplace(tmpHTML[i], '</a>', '', true); end else begin //\83\81\83\8b\97\93\96³\82µ
tmpDatToken[2] := '';
end;
//====================//
tmpDatToken[1] := CustomStringReplace(tmpDatToken[1], '</b>', '', true);
tmpHTML[i] := Copy(tmpHTML[i], tE + 8, Length(tmpHTML[i]));
end else begin
- tmpDatToken[1] := '';
+ // \93\8a\8de\93ú\82Ì\82È\82¢\83p\83^\81[\83\93\82ð\8b~\82¤
+ tE := AnsiPos('\81F', tmpLine);
+ if tE > 0 then begin
+ tmpDatToken[1] := Trim(Copy(tmpHTML[i], 1, tE - 1 ));
+ tmpDatToken[1] := CustomStringReplace(tmpDatToken[1], '<b>', '', true);
+ tmpDatToken[1] := CustomStringReplace(tmpDatToken[1], '</b>', '', true);
+ tmpHTML[i] := Copy(tmpHTML[i], tE + 2, Length(tmpHTML[i]));
+ end else begin
+ tmpDatToken[1] := '';
+ end;
end;
//====================//
//==\93ú\95t\8e\9e\8d\8f\82Ì\8eæ\93¾==//