Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Win98 и Delphi7 [D7, Win95/98, WinME]


parovoZZ ©   (2004-07-22 12:53:00) 

Как заставить работать приложение, которое написано в среде WinХР и на 7-ой делфе (WinApi!) в Windows98? Оно как-бы() работает, но страшно глючит. А в WinXP просто летает. Ничего не понимаю.


parovoZZ   (2004-07-27 21:26:00) [1]

Вообщем поставил делфю на 98 - ую, всё равно не помогло, разве что диалоги заработали. Короче, помойка плачет по 98-ой.


parovoZZ   (2004-07-24 17:24:00) [2]

Ладно, попробую поставить делфю на 98-ую, посмотрю, что получится. Спасибо за проявленный интерес. К тому же TOpenFilename здесь не причём. Прграммки и без него не работаютъ на 98-ой. Обидно.


AD_infiniTUM   (2004-07-23 22:34:00) [3]

В XP и 98 размер lStructSize в окнах открытия и сохранения должен быть разный. Потому в XP работает, а в 98 нет.


parovoZZ   (2004-07-23 19:06:00) [4]

А где же тогда? Проверял на разных компах, результат один и тот же - на ХР работает, на 98-ой нет.


Anatoly Podgoretsky   (2004-07-23 00:22:00) [5]

WinХР и на Дельфи 7 не причем, не там врагов ищешь.


DVM   (2004-07-22 23:36:00) [6]


> в 98 - ой - нет (не открываются окна сохранения и открытия
> файлов). В исходнике ничего не менял. В общем бред какой-то.

Не бред, а так и должно быть. Точнее не должно, но видно так написали.
function OpenFileDialog(hOwner: HWND): string;
var
 ofn: TOpenFilename;
 szFileName: array[0..260] of char;
begin
 ZeroMemory(@ofn, 76);
  ofn.lStructSize := 76;
 ofn.hInstance := hInstance;
 ofn.hwndOwner := hOwner;
 ofn.lpstrFilter := 'Âñå ôàéëû'#0+';*.*'#0;
 ofn.nFilterIndex := 1;
 ofn.lpstrFile := @szFileName[0];
 ofn.lpstrFile[0] := #0;
 ofn.nMaxFile := SizeOf(szFileName);
 ofn.lpstrFileTitle := nil;
 ofn.nMaxFileTitle := 0;
 ofn.lpstrInitialDir := nil;
 ofn.Flags := OFN_PATHMUSTEXIST or OFN_FILEMUSTEXIST;
 GetOpenFileName(ofn);
 result := ofn.lpstrFile;
end;


parovoZZ   (2004-07-22 23:20:00) [7]

Ну что, Делфи 6 ставить что-ли?


parovoZZ   (2004-07-22 17:14:00) [8]


> Ой, да у тебя там ошибки в программе!

Скачал исходник программки Bred2 с procoder.ru, откомпилил. В ХР работает, в 98 - ой - нет (не открываются окна сохранения и открытия файлов). В исходнике ничего не менял. В общем бред какой-то.


Reindeer Moss Eater   (2004-07-22 13:18:00) [9]

но страшно глючит
Ой, да у тебя там ошибки в программе!


parovoZZ   (2004-07-22 13:14:00) [10]

Да? Написал, чтоб не было лишних вопросов.
Используемые функции вроде все поддерживаются 98-ой, но всё равно не работает.


Digitman   (2004-07-22 12:56:00) [11]


> написано в среде WinХР


нет такой "среды написания"

есть "операционная система", которой глубоко по поясу, чего ты там написал под ее управлением


Наверх

Титульная страница Поиск, карта сайта Написать письмо