Browse CVS Repository
Diff of /gikonavigoeson/gikonavi/GikoBayesian.pas
Parent Directory
| Revision Log
| Revision Graph
| Patch
| 634 |
if mode <> newMode then begin |
if mode <> newMode then begin |
| 635 |
|
|
| 636 |
// 文字のタイプが変更された |
// 文字のタイプが変更された |
| 637 |
SetLength( aWord, p - last ); |
if mode <> ModeWhite then begin |
| 638 |
CopyMemory( PChar( aWord ), last, p - last ); |
SetLength( aWord, p - last ); |
| 639 |
|
CopyMemory( PChar( aWord ), last, p - last ); |
| 640 |
|
|
| 641 |
words.Text := changeMode( aWord, mode ); |
words.Text := changeMode( aWord, mode ); |
| 642 |
|
|
| 643 |
// 単語登録 |
// 単語登録 |
| 644 |
addWord( wordCount, words ); |
addWord( wordCount, words ); |
| 645 |
|
end; |
| 646 |
|
|
| 647 |
last := p; |
last := p; |
| 648 |
mode := newMode; |
mode := newMode; |
|
|
Legend:
| Removed from v.1.12 |
|
| changed lines |
| |
Added in v.1.13 |
|
|
| |