Win98 и Delphi7

← →
parovoZZ © (2004-07-22 12:53) [0]

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

← →
Digitman © (2004-07-22 12:56) [1]

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

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

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

← →
parovoZZ © (2004-07-22 13:14) [2]

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

← →
Reindeer Moss Eater © (2004-07-22 13:18) [3]

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

← →
parovoZZ © (2004-07-22 17:14) [4]

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

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

← →
parovoZZ © (2004-07-22 23:20) [5]

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

← →
DVM © (2004-07-22 23:36) [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;

← →
Anatoly Podgoretsky © (2004-07-23 00:22) [7]

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

← →
parovoZZ © (2004-07-23 19:06) [8]

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

← →
AD_infiniTUM (2004-07-23 22:34) [9]

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

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

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

Win98 и Delphi7 Найти похожие ветки