Page 3 – AC forum

Forum Replies Created

Viewing 20 posts - 41 through 60 (of 71 total)

← 1 2 3 4 →

Author

Posts
January 6, 2011 at 10:49 am in reply to: [7.26] acZLibEx.zcalloc Exception OutOfMemory В общем жрёт не по детски! #44346

Ahell
Participant

У меня такого не возникает… странно.. но ошибки одни и теже, зачем две разные темы?

December 28, 2010 at 11:31 am in reply to: [Ac 7.26] после востановления из трея в Win7 нет отрисовки компонент. #44315

Ahell
Participant

исходников компонента? Хаха.. Вот он!: http://rouse.drkb.ru/components.php#fwtray

December 27, 2010 at 6:06 pm in reply to: [Ac 7.26] после востановления из трея в Win7 нет отрисовки компонент. #44310

Ahell
Participant

Жаль что сийкомпонент никак не адаптировать под AC=)

December 23, 2010 at 1:24 pm in reply to: [AC 7.25] Небольшое кол-во ошибок которые я выловил. #44300

Ahell
Participant

Все хорошо =)

December 23, 2010 at 1:24 pm in reply to: Загрузка параметров скинов(HUE,Saturation) #44299

Ahell
Participant

Работает=)

December 22, 2010 at 7:39 pm in reply to: [7.26] acZLibEx.zcalloc Exception OutOfMemory В общем жрёт не по детски! #44277

Ahell
Participant

Да именно его я и использую..

исходник не изменял. Не уверен что проблемма именно в этом компоненте. Т.к. еслиь бы была проблема она бы уже давно проявила себя.

Но возникла только после установки AC 7.26

тем более что вот тот же случай(Сегодня в 20:26) пришёл отчёт от юзера:

Code:

process id : $1204
allocated memory : 11,77 MB
executable : HLR.exe
exec. date/time : 2010-12-21 19:37
version : 1.8.0.1780
compiled with : Delphi 7
callstack crc : $a32b4ce5, $ed350376, $71fc6eaf
exception number : 1
exception class : EOutOfMemory
exception message : Out of memory.

main thread ($1288):
004027a3 +0013 HLR.exe 004f50c4 +0004 HLR.exe 00504cf0 +00e4 HLR.exe 00504784 +0078 HLR.exe 004c794e +0042 HLR.exe 004c7900 +0018 HLR.exe 0059917a +0442 HLR.exe 004cbb9b +00ff HLR.exe Menus 0047437f +000f HLR.exe 004746ad +0005 HLR.exe 004ceb82 +00da HLR.exe Menus 004bed43 +022f HLR.exe Forms 005a6bb1 +61d9 HLR.exe 00467449 +0059 HLR.exe 004676b1 +0015 HLR.exe 004d893c +002c HLR.exe 00471c58 +0014 HLR.exe 7c938553 +002b ntdll.dll 77f53c8c +005c USER32.dll 004d5c60 +0188 HLR.exe 004d8cbf +0157 HLR.exe 004bef35 +0421 HLR.exe Forms 005a50f8 +4720 HLR.exe 004d893c +002c HLR.exe 00471c58 +0014 HLR.exe 7c938553 +002b ntdll.dll 004d6cd6 +0106 HLR.exe 004dc2b3 +005f HLR.exe 004a3852 +006a HLR.exe 004d5c60 +0188 HLR.exe 004d8cbf +0157 HLR.exe 0054fa58 +0030 HLR.exe 005488af +0677 HLR.exe 0054d5bc +00e4 HLR.exe 00549049 +075d HLR.exe 004d893c +002c HLR.exe 00471c58 +0014 HLR.exe 7c938553 +002b ntdll.dll 004d6044 +000c HLR.exe 004d5c60 +0188 HLR.exe 004d8cbf +0157 HLR.exe 004a2306 +0072 HLR.exe 0051dc61 +06f5 HLR.exe 0054fa58 +0030 HLR.exe 005488af +0677 HLR.exe 0054d5bc +00e4 HLR.exe 00549049 +075d HLR.exe 004d893c +002c HLR.exe 00471c58 +0014 HLR.exe System @GetMem
acZLibEx 579 +0 zcalloc
acAlphaImageList 491 +6 TsAlphaImageList.GetBitmap32
acAlphaImageList 374 +7 TsAlphaImageList.DoDraw
ImgList TCustomImageList.Draw
ImgList TCustomImageList.Draw
sSkinMenus 1003 +64 TsSkinableMenus.sAdvancedDrawLineItem
TMenuItem.AdvancedDrawItem
Graphics TGraphicsObject.Changed
Graphics TFont.Changed
DrawMenuItem
TCustomForm.WndProc
sSkinProvider 4177 +1771 TsSkinProvider.NewWndProc
Classes TList.Delete
Classes TList.Remove
Controls TWinControl.MainWndProc
Classes StdWndProc
KiUserCallbackDispatcher
DefWindowProcA
Controls TControl.WndProc
Controls TWinControl.WndProc
TCustomForm.WndProc
sSkinProvider 3627 +1221 TsSkinProvider.NewWndProc
Controls TWinControl.MainWndProc
Classes StdWndProc
KiUserCallbackDispatcher
Controls TControl.WMContextMenu
Controls TWinControl.WMContextMenu
ComCtrls TCustomListView.WMContextMenu
Controls TControl.WndProc
Controls TWinControl.WndProc
acSBUtils 5400 +6 TacMainWnd.CallPrevWndProc
acSBUtils 3104 +143 TacScrollWnd.acWndProc
acSBUtils 4679 +23 TacBaseWnd.acWndProc
acSBUtils 3272 +155 TacEditWnd.acWndProc
Controls TWinControl.MainWndProc
Classes StdWndProc
KiUserCallbackDispatcher
Controls TControl.WMRButtonDown
Controls TControl.WndProc
Controls TWinControl.WndProc
ComCtrls TCustomListView.WndProc
sListView 470 +198 TsCustomListView.WndProc
acSBUtils 5400 +6 TacMainWnd.CallPrevWndProc
acSBUtils 3104 +143 TacScrollWnd.acWndProc
acSBUtils 4679 +23 TacBaseWnd.acWndProc
acSBUtils 3272 +155 TacEditWnd.acWndProc
Controls TWinControl.MainWndProc
Classes StdWndProc

thread $1190:
7c937d17 +a ntdll.dll NtWaitForMultipleObjects

thread $5f4:
7c936f67 +a ntdll.dll NtDelayExecution

thread $804:
7c9377f7 +a ntdll.dll NtRemoveIoCompletion

thread $12a8:
7c9377f7 +a ntdll.dll NtRemoveIoCompletion

thread $f34 (TAppThread):
7c937d27 +0a ntdll.dll NtWaitForSingleObject
7c821d08 +82 kernel32.dll WaitForSingleObjectEx
7c821c78 +0d kernel32.dll WaitForSingleObject
005dc4b0 +d8 HLR.exe AppThreadUnit 99 +22 TAppThread.Execute
0044f7b7 +2b HLR.exe madExcept HookedTThreadExecute
00470074 +34 HLR.exe Classes ThreadProc
00404998 +28 HLR.exe System ThreadWrapper
0044f699 +0d HLR.exe madExcept CallThreadProcSafe
0044f703 +37 HLR.exe madExcept ThreadExceptFrame
>> created by main thread ($1288) at:
005dd4be +16 HLR.exe AppsListUnit 100 +3 TApp.Start

active control:
TsListView “Appslist” [, FreeNotification]
TsTabSheet “ApplicationsPage” []
TsPageControl “Pages” []
TMainForm “MainForm” [, FreeNotification]

memory info:
– AvailPageFile: Integer = 6123520
– AvailPhysicalMemory: Integer = 2147483647
– AvailVirtualMemory: Integer = 2079428608
– MemoryLoad: Integer = 27
– TotalPageFile: Integer = -1
– TotalPhysicalMemory: Integer = 2147483647
– TotalVirtualMemory: Integer = 2147352576

cpu registers:
eax = 00d500d0
ebx = 004027a8
ecx = 00000000
edx = 004027a8
esi = 004027a8
edi = 00000041
eip = 004027a8
esp = 0012e558
ebp = 0256da89

stack dump:
0012e558 a8 27 40 00 de fa ed 0e – 01 00 00 00 07 00 00 00 .'@………….
0012e568 6c e5 12 00 a8 27 40 00 – d0 00 d5 00 a8 27 40 00 l….'@……'@.
0012e578 a8 27 40 00 41 00 00 00 – 89 da 56 02 88 e5 12 00 .'@.A…..V…..
0012e588 01 00 00 00 c8 28 40 00 – ec 1d 55 02 00 00 00 00 …..(@…U…..
0012e598 a8 27 40 00 34 1e 55 02 – c9 50 4f 00 c4 56 4f 00 .'@.4.U..PO..VO.
0012e5a8 ec 1d 55 02 39 01 00 00 – 05 00 00 00 34 1e 55 02 ..U.9…….4.U.
0012e5b8 75 6b 4f 00 ec 1d 55 02 – 01 00 00 00 e5 d9 56 02 ukO…U…….V.
0012e5c8 00 00 00 00 1b 00 00 00 – 8e 01 00 00 41 00 00 00 …………A…
0012e5d8 00 00 00 00 00 07 04 00 – 04 00 00 00 00 00 00 00 …………….
0012e5e8 00 00 00 00 08 00 00 00 – 10 e6 12 00 20 e6 12 00 …………….
0012e5f8 28 ff 4f 02 e8 1d 55 02 – fc 88 56 00 a4 d9 56 02 (.O…U…V…V.
0012e608 41 00 00 00 a4 fe 4f 02 – 41 00 00 00 4a 9c 56 00 A…..O.A…J.V.
0012e618 41 00 00 00 8e 01 00 00 – a4 d9 56 02 9c e6 12 00 A………V…..
0012e628 9b 27 40 00 9c e6 12 00 – a4 d9 56 02 41 00 00 00 .'@…….V.A…
0012e638 01 53 d5 00 51 98 56 00 – a4 e6 12 00 e0 42 40 00 .S..Q.V……B@.
0012e648 9c e6 12 00 00 ff 4f 02 – 30 72 47 00 e4 53 d5 00 ……O.0rG..S..
0012e658 94 e6 12 00 00 00 00 00 – 00 00 00 00 10 00 00 00 …………….
0012e668 10 00 00 00 56 00 00 00 – 08 00 00 00 e3 a6 46 00 ….V………F.
0012e678 10 00 00 00 01 00 00 00 – 00 ff 4f 02 ec d9 56 02 ……….O…V.
0012e688 a4 d9 56 02 04 00 00 00 – 00 00 00 00 db e6 12 00 ..V………….

disassembling:
004f50c0 public acZLibEx.zcalloc: ; function entry point
004f50c0 579 mov eax, edx
004f50c2 imul ecx
004f50c4 > call -$f2939 ($402790) ; System.@GetMem
004f50c4
004f50c9 580 ret

опяить тот же баг:

тут о TFWTrayIcon вообще и слова нет.

December 15, 2010 at 5:25 pm in reply to: Загрузка параметров скинов(HUE,Saturation) #44211

Ahell
Participant

Нашёл проблему:

Проблема в функциях:

SkinManager.BeginUpdate;

SkinManager.EndUpdate(True,False);

При использовании ^^ т.е. так:

Code:

MainForm.SkinManager.BeginUpdate;
MainForm.SkinManager.SkinName := ini.ReadString('Skins', 'SkinName', 'Vienna Ext');
MainForm.SkinManager.Saturation := ini.ReadInteger('Skins', 'Saturation', 0);
MainForm.SkinManager.HueOffset := ini.ReadInteger('Skins', 'HUEOffset', 0);
b:=ini.ReadBool('Skins', 'UseSkins', True);
SettingsForm.UseSkinsChk.Checked :=b;
MainForm.SkinManager.Active :=b;
//Перезапуск скинменеджера.. перерисовка скинов.. Др. варианта не нашёл..
MainForm.SkinManager.EndUpdate(True, false);

Устанавливает скин, и приминяет его.

Но забывает применить к скину значения Saturation и HUE.

Хотя успешно втыкает их в SkinManager.HUEOffset и SkinManager.Saturation

Хз почему 😮 , без использования BeginUpdate .. EndUpdate(True,False) все нормально т.е. так:

Code:

//MainForm.SkinManager.BeginUpdate;
MainForm.SkinManager.SkinName := ini.ReadString('Skins', 'SkinName', 'Vienna Ext');
MainForm.SkinManager.Saturation := ini.ReadInteger('Skins', 'Saturation', 0);
MainForm.SkinManager.HueOffset := ini.ReadInteger('Skins', 'HUEOffset', 0);
b:=ini.ReadBool('Skins', 'UseSkins', True);
SettingsForm.UseSkinsChk.Checked :=b;
MainForm.SkinManager.Active :=b;
//Перезапуск скинменеджера.. перерисовка скинов.. Др. варианта не нашёл..
//MainForm.SkinManager.EndUpdate(True, false);

Support просьба исправить этот недочёт=)

P.S. AC 7.25

December 14, 2010 at 7:00 pm in reply to: Локализация форм AC(SelectSkin,SelectDir) и папка Res в сборке AC #44200

Ahell
Participant

Нет перевода только у FormSelectSkin.

Ну вот пока нет перевода я придумал свой способ=)

Смотрим демку, там наглядно показано как переводить=)

Не ругаться если я “Америку открыл” :blush:

November 30, 2010 at 6:27 pm in reply to: Проблема с демкой #44038

Ahell
Participant

Просто удаляем SkinManager и заного его кладём на форму.

November 25, 2010 at 9:58 am in reply to: [Предложение] "Задняя" надпись у всех Edit.View компонентов.. #43966

Ahell
Participant

Delphi 7 на 100% не последняя версия.

November 25, 2010 at 7:48 am in reply to: [Предложение] "Задняя" надпись у всех Edit.View компонентов.. #43961

Ahell
Participant

Нету там такого=( 😕

November 25, 2010 at 6:30 am in reply to: [AC 7.23 Ошибка BPL] Редактирование шрифта TsEdit.BoundLabel #43960

Ahell
Participant

Однако если не вызвать FontDialog а просто развернуть свойство Font у TsEdit.BoundLabel и там все указывать то, все просто отлично :huh:

November 24, 2010 at 5:45 pm in reply to: Есть ли смысл AC + TntUnicodeControls ? #43948

Ahell
Participant

Я решил не страдать этой панацеей с TntUnocode юзеры пака с английским помучаются=) Ничего не случится.

Скоро поставлю D2010 и не будет проблем=)

А:

Support wrote:

Кнопки, по идее, не должны правильно рисоваться.

Улыбнуло! 😮 😀

November 24, 2010 at 7:36 am in reply to: Есть ли смысл AC + TntUnicodeControls ? #43871

Ahell
Participant

Благодарю за ответ, значит придётся переседать на Unicode

November 17, 2010 at 5:21 pm in reply to: RadioGroup в RadioBox плохо смотрится если скины отключены. #43830

Ahell
Participant

Если положить обычный TGroupBox в него обычный TRadionGrup и заблокировать RadioBox то такой серости от RadioGroup не наблюдается..

November 17, 2010 at 2:16 pm in reply to: RadioGroup в RadioBox плохо смотрится если скины отключены. #43827
Ahell
Participant
```
object TrayShowHideFormGr: TsGroupBox


Left = 8


Top = 80


Width = 313


Height = 161


Hint = #1044#1077#1081#1080#1089#1090#1074#1080#1103' '#1087#1088#1086#1075#1088#1072#1084#1084#1099' '#1087#1088#1080' '#1082#1072#1082#1080#1093'-'#1083#1080#1073#1086' '#1076#1077#1081#1089#1090#1074#1080#1103#1093' '#1089' '#1080#1082#1086#1085#1082#1086#1081' '#1074' '#1090#1088#1077#1077'.'


Caption = #1057#1082#1088#1099#1090#1080#1077'/'#1087#1086#1082#1072#1079' '#1087#1088#1086#1075#1088#1072#1084#1084#1099': '


Enabled = False


TabOrder = 2


SkinData.SkinSection = 'GROUPBOX'








object ShowClickStyleGr: TsRadioGroup


Left = 8


Top = 16


Width = 297


Height = 65


Hint = 


#1057#1090#1080#1083#1100' '#1089#1095#1077#1083#1095#1082#1072' '#1082#1085#1086#1087#1082#1086#1081' '#1084#1099#1096#1080' '#1087#1086' '#1080#1082#1086#1085#1082#1077' '#1074' '#1090#1088#1077#1077' '#1076#1083#1103' '#1090#1086#1075#1086' '#1095#1090#1086#1073#1099' '#1086#1090#1086#1073#1088 +


#1072#1079#1080#1090#1100' '#1080#1083#1080' '#1089#1082#1088#1099#1090#1100' '#1087#1088#1086#1075#1088#1072#1084#1084#1091' '#1089'('#1085#1072') '#1101#1082#1088#1072#1085#1072'('#1085#1077').'


Caption = #1058#1080#1087' '#1082#1083#1080#1082#1072': '


TabOrder = 2


OnClick = ShowClickStyleGrClick


SkinData.SkinSection = 'GROUPBOX'


ItemIndex = 0


Items.Strings = (


#1044#1074#1086#1081#1085#1086#1081' '#1082#1083#1080#1082


#1054#1076#1085#1080#1085#1086#1095#1085#1099#1081' '#1082#1083#1080#1082)


end
```
November 17, 2010 at 12:55 pm in reply to: RadioGroup в RadioBox плохо смотрится если скины отключены. #43825

Ahell
Participant

0 эффекта=)

Ничего не изменилось, результат такой же как и в первом посте.

November 16, 2010 at 2:21 pm in reply to: AV при вызове диалога выбора скинов #43811

Ahell
Participant

при вызове диалога выбора скинов (SelectSkin(MainForm.SkinManager))

Забрасывает Acces Vuiolation'ми что программа не смогла обратится по адресу: 00000000 Дебаг показал что проблма на TsSkinManager.GetSkinIndex.

Поизучал проблему. оказалость если удалить INI или удалить из него значения параметра SkinDirectory то ошибками забросает.

November 15, 2010 at 12:30 pm in reply to: AV при вызове диалога выбора скинов #43782

Ahell
Participant

Да на TSplashForm и на TMainForm находнгятся TSkinManager но вс1ё это выглядит так:

Code:

begin
SetThreadLocale(1049);
if CheckMutex('Ren') then
begin
HLR_MsgBox(RsMsgOnlyOne, MB_OK or MB_ICONWARNING);
Exit;
end
else
if CheckDirs then
begin
HLR_MsgBox(RsMsgDataFolderNotFound, MB_OK or MB_ICONWARNING);
Exit;
end
else
Application.Initialize;
if not RunParams('nss') then //Если нет параметра No Splash Screen то
begin
try
SF := TSplashForm.Create(Application); //Создаём окно
SF.Show; //Показываем его
SF.Update;
for i := SF.ProgressLoad.MinValue to SF.ProgressLoad.MaxValue do
begin
SF.ProgressLoad.Progress := i + 1;
Sleep(20);
end;
Application.ProcessMessages; //пака не завершиться цикл
SF.Hide; //прячем
finally
FreeAndNil(SF); //уничтожаем
end;
end
else
Application.CreateForm(TMainForm, MainForm); //создаём все оставшиеся окна.
Application.CreateForm(TSettingsForm, SettingsForm);
Application.CreateForm(TAddAppForm, AddAppForm);
Application.CreateForm(TSelfUpdatingForm, SelfUpdatingForm);
Application.CreateForm(TAboutForm, AboutForm);
Application.Run;
end.

TSplashForm это AvaliableForms. Вы имеете ввиду тот факт если на ней лежит компнент SknManager и независимо от того была ли вообще создана эта форма, скины будут работать?

November 14, 2010 at 9:50 pm in reply to: AV при вызове диалога выбора скинов #43740

Ahell
Participant

TSplashform это форма создаётся “руками” и уничтожается ещё до того как происходит процесс создания основных форм. С этим проблем нет. Ранее работало, обновил AC до 7.21 и вот те на. Даже не знаю где проблема, толи в коде, толи в компонетах.
Author

Posts

Viewing 20 posts - 41 through 60 (of 71 total)

← 1 2 3 4 →