Створюємо log файл setupinitializefilelog - все про it і програмуванні

Ну давайте відразу глянемо код:

Спочатку ми створюємо змінну типу HSPFILELOG. Вона визначена так:

У неї і буде поміщений результат виконання функції SetupInitializeFileLog куди передається ім'я LOG файлу і прапор. Це прапор SPFILELOG_FORCENEW. говорить про те, що перезаписувати файл якщо він є. Які ще прапори є.

Ну і природно, що якщо результат не дорівнює INVALID_HANDLE_VALUE все нормально. До речі знаєте навіщо ось ці прапори. Ну по-перше системний LOG не можна перезаписувати. А прапор на вибірку - це для продовження інсталяції після переривання. Чи стикалися в Windows при пошуку обладнання. Ось приблизно те ж саме зробити можете і Ви.

По-перше, створіть в Delphi просту DLL: <Начало кода DLL>Library MinMax; Function Min (X, Y: Integer): Integer; export; begin if X Y then Max: = X else Max: = Y; end; Exports Min index 1, Max inde.

Методи: 1) Використовувати CAnimateCtrl: CAnimateCtrl m_Animate; m_Animate.Create (WS_CHILD | WS_VISIBLE | ACS_TRANSPARENT | ACS_CENTER, CRect (10,10,200,200), this, NULL); m_Animate.Open ( "D: \\ Test \\ ok1.avi" ); m_Animate.Play (0, -1, -1); # include mmsystem.hLibrary. Winmm.l.

Додаток відкриває файл ORIGINAL.TXT за допомогою функції CreateFile. Потім, за допомогою функції GetTempFileName додаток генерує ім'я тимчасового файлу і використовуючи CreateFile створює тимчасовий файл. Далі відбувається зчитування в буфер блоками по 4K, перетворення символів до верхнього регістру.