Просмотр полной версии : Вопрос про UO Script
такой вот вопрос : Как вообще можно получить ContainerHandel? и именно главного бекпака чара?
Alex M.A.
27.05.2004, 10:25
http://uoo.ru/phpBB/viewtopic.php?t=130755&27444
сенкс, ещё один вопрос. Как можно переписать процедуру ShowMessage? с какой библеотеки её можно импортировать и с какими параметрами она?
Alex M.A.
27.05.2004, 15:16
WinApi
Program MessageBoxDemo;
const
MB_OK = 0;
MB_OKCANCEL = 1;
MB_STOPRETRYIGNORE = 2;
MB_YESNOCANCEL = 3;
MB_YESNO = 4;
MB_RETRYCANCEL = 5;
IDOK = 1;
IDCANCEL = 2;
IDSTOP = 3;
IDRETRY = 4;
IDIGNORE = 5;
IDYES = 6;
IDNO = 7;
MB_ICONERROR = 16;
MB_ICONQUESTION = 32;
MB_ICONWARNING = 48;
MB_ICONINFORMATION = 64;
var
DialogResult: LongInt;
function MessageBox(HWND: LongInt; aText: PChar; Caption: PChar; uType: Word): Longint; external 'MessageBoxA@user32.dll stdcall';
begin
DialogResult:=MessageBox(0, 'Что выбираем?', 'Вопрос', MB_ICONQUESTION + MB_YESNOCANCEL);
Case DialogResult of
IDYES: MessageBox(0, 'Вы нажали "Да"', 'Результат', MB_ICONINFORMATION);
IDNO: MessageBox(0, 'Вы нажали "Нет"', 'Результат', MB_ICONINFORMATION);
IDCANCEL: MessageBox(0, 'Вы нажали "Отмена"', 'Результат', MB_ICONINFORMATION);
end;
end.
Текс... и ещё один вопрос. :)
есть ли в УОСкрипте аналог библеотек в паскале?
(uses mylib; ) если есть то как это написать в Uoscripte?
{$Include functions.uops}
А где можно посмотреть доп. команды уоскрипта, в хелпах этого не где нету.. =(
Пожалуй, это и всё из неотражённого в хелпе.
В папке Demos есть кой-какие примеры.
И в мануале "Функции и константы" -> "Разное" -> "Другие функции".
Остальное в хелпе паскаля (например for, while...)
Или тебе все функции паскаля в справочник уоскрипта воткнуть? ;)
ps: При инклуде желательно прописывать полный путь.
Mips, я имел ввиду типо {$include} ,просто в паскале такого нету.
Alex M.A.
27.05.2004, 23:23
есть...
директива компилятора {$I <filename>}
просто тут сделал Include... так понятней для всех...
Powered by vBulletin™ Version 4.0.3 Copyright © 2024 vBulletin Solutions, Inc. All rights reserved. Перевод: zCarot