[habib2302]

доброе время суток. как убрать размер компонентов?

[Optitron]

habib2302, В .isl файле попробуй 2 значения очистить (находятся в "Select Components" wizard page)

читать дальше »

Код:

ComponentSize1=%1 Кб
ComponentSize2=%1 Мб

Код:

ComponentSize1=
ComponentSize2=

[Nordek]

В .isl файле попробуй 2 значения очистить (находятся в "Select Components" wizard page) »

Чё?

habib2302, Не страдай геморроем, в скрипте создай секцию [Messages] и добавь в неё "ComponentSize1" и "ComponentSize2":

Код:

[Messages]
ComponentSize1=
ComponentSize2=

[Mat_y]

доброе время суток. как убрать размер компонентов? »

[Setup]
ShowComponentSizes=no

[Raf-9600]

Можно ли как-то отследить, ли воспроизводиться через Bass.dll что-либо?
Т.е. мне нужно сделать чтобы кнопка "Стоп" (прерывающая воспроизведение) была активной только если что-то воспроизводиться.

[FX-DENIS]

Ребята можете помочь,как прописать для ярлыка который создастся на рабочем столе параметр,то есть у ярлыка в строке объект написано так "D:\Games\Far Cry 3\bin\farcry3_d3d11.exe" -offline -language=russian,вот это надо чтобы было в ярлыке после exe -offline -language=russian ,в справке инно не нашел как сделать.

Код:

Name: {userdesktop}\Far Cry 3_DX11; Filename: {app}\bin\farcry3_d3d11.exe; Tasks: desktopicon; IconFilename: {app}\game.ico; WorkingDir: {app}\bin\; Languages:

[Raf-9600]

FX-DENIS,

Код:

Name: {userdesktop}\Far Cry 3_DX11; Filename: {app}\bin\farcry3_d3d11.exe; Tasks: desktopicon; IconFilename: {app}\game.ico; WorkingDir: {app}\bin\; Parameters: "-offline -language=russian";

[Raf-9600]

Вроде бы нагуглил ответ на предыдущий вопрос, можно через Bass.dll узнавать длительность трека и передавать её в таймер, однако таймер пишет ошибку Match error.
Кто нибудь может подсказать, в чём ошибка?

Код:

function SetTimer(hWnd: LongWord; nIDEvent, uElapse: LongWord; lpTimerFunc: LongWord): LongWord; external 'SetTimer@user32.dll stdcall';
function KillTimer(hWnd: LongWord; nIDEvent: LongWord): BOOL; external 'KillTimer@user32.dll stdcall';

procedure DisableStopSoundBtn(hwnd: HWND; uMsg: UINT; idEvent: UINT_PTR; dwTime: DWORD);
begin
  KillTimer(WizardForm.Handle, idEvent);
  StopSoundBtn.Enabled := False;
end;

function PlayRandDemoSound(const Sounds: array of String): boolean;
var
    uSoundName, uSoundPath: String;
    hSound: HWND;
    ChLen: Integer;
    ChCountSec: Integer;
begin
    BASS_Stop();
    BASS_Free();
    uSoundName := Sounds[Random(GetArrayLength(Sounds))];
    if not FileExists(AddBackslash(RemoveBackslash(ExpandConstant('{tmp}'))) + 'BASS.dll') then
        ExtractTemporaryFile('BASS.dll');
    uSoundPath := ExpandConstant(AddBackslash(RemoveBackslash(ExpandConstant('{tmp}'))) + uSoundName);
    if not FileExists(uSoundPath) 
        then ExtractTemporaryFile(uSoundName);
    try
        BASS_Init(-1, 44100, 0, 0, 0);
        hSound := BASS_StreamCreateFile(False, uSoundPath, 0, 0, 0, 0, 0);
        
        ChLen := BASS_ChannelGetLength(hSound, 0);
        ChCountSec := Round(BASS_ChannelBytes2Seconds(hSound, ChLen));
        SetTimer(WizardForm.Handle, 777, 500, CallbackAddr('DisableStopSoundBtn'));
        
        BASS_Start();
        Result := BASS_ChannelPlay(hSound, False);
    finally
        ClearTempFolder('*.ogg');
    end;
end;

[dima.dmitrienko.71@fb]

Цитата dima.dmitrienko.71@fb: Как сделать так чтобы когда наводишь на название какого-то файла выскакивала картинка? » Уже задавался вопрос, ответ был дан. Лень поискать? »

я пытаюсь вставить но у меня ошибка можете хотябы для одного элемента сделать а дальше я сам.

[Nordek]

я пытаюсь вставить но у меня ошибка можете хотябы для одного элемента сделать а дальше я сам. »