Changeset 329
- Timestamp:
- Feb 20, 2012, 10:01:11 AM (13 years ago)
- Location:
- Common
- Files:
-
- 1 added
- 6 edited
Legend:
- Unmodified
- Added
- Removed
-
Common/Languages/UDebugLog.po
r328 r329 4 4 #: udebuglog.sfilenamenotdefined 5 5 msgid "Filename not defined" 6 msgstr " "6 msgstr "Content-Type: text/plain; charset=UTF-8Content-Type: text/plain; charset=UTF-8" 7 7 -
Common/Languages/UPool.po
r328 r329 4 4 #: upool.sobjectpoolempty 5 5 msgid "Object pool is empty" 6 msgstr " "6 msgstr "Content-Type: text/plain; charset=UTF-8Content-Type: text/plain; charset=UTF-8" 7 7 8 8 #: upool.sreleaseerror -
Common/Languages/UResetableThread.po
r328 r329 4 4 #: uresetablethread.swaiterror 5 5 msgid "WaitFor error" 6 msgstr " "6 msgstr "Content-Type: text/plain; charset=UTF-8Content-Type: text/plain; charset=UTF-8" 7 7 -
Common/Languages/UThreading.po
r328 r329 4 4 #: uthreading.scurrentthreadnotfound 5 5 msgid "Current thread ID %d not found in virtual thread list." 6 msgstr " "6 msgstr "Content-Type: text/plain; charset=UTF-8Content-Type: text/plain; charset=UTF-8" 7 7 -
Common/ULastOpenedList.pas
r328 r329 65 65 try 66 66 RootKey := Root; 67 OpenKey(Key + '\LastOpenedFiles', True);67 OpenKey(Key, True); 68 68 Clear; 69 69 I := 0; … … 86 86 with Registry do 87 87 try 88 OpenKey(Key + '\LastOpenedFiles', True);88 OpenKey(Key, True); 89 89 for I := 0 to Count - 1 do 90 90 WriteString('File' + IntToStr(I), UTF8Decode(Strings[I])); -
Common/UResetableThread.pas
r299 r329 53 53 FOnException: TExceptionEvent; 54 54 procedure MethodFinish(Sender: TObject); 55 procedure ThreadException(Sender: TObject; E: Exception);56 55 protected 57 56 function NewItemObject: TObject; override; … … 59 58 LastExceptionClass: TClass; 60 59 LastExceptionMessage: string; 60 procedure ThreadException(Sender: TObject; E: Exception); 61 61 procedure CheckException; 62 62 procedure WaitForEmpty;
Note:
See TracChangeset
for help on using the changeset viewer.