*Начало * Ответить * Статистика * Задать вопрос * Поиск * FAQ * * |
DotFix Forum / Вопросы программирования и исследования защит / предлагаю всем open sourse проект |
Автор | Сообщение |
neznaiy Участник |
Дата: 25 Дек 2008 22:04 все кто хотят коллективно разрабатывать свой язык программирования пишите здесь. Со дня на день выложу исходники начинаний! |
Admin Администратор |
Дата: 26 Дек 2008 09:44 Quoting: neznaiy Со дня на день выложу исходники начинаний! Ну вот как выложишь так бы и создал тему а пока это просто флуд. |
neznaiy Участник |
Дата: 26 Дек 2008 15:37 http://content.files.mail.ru/Q6X8PD/455d0b3752039f48ee03ae0691bfc269 |
Admin Администратор |
Дата: 27 Дек 2008 01:20 neznaiy Форма готова, теперь надо писать самое сложное |
neznaiy Участник |
Дата: 28 Дек 2008 11:57 Помогите пожалуйста. Пишу оператор Окно.Размер, Кусок кода: Case "Окно.Размер," params(1) = ЗапятаяНаКонце(params(1)) params(2) = ЗапятаяНаКонце(params(2)) params(3) = ЗапятаяНаКонце(params(3)) MsgBox params(1) Call SetWindowPos(params(1), params(1), 67, 67, params(2), params(3 Функция ЗапятаяНаКонце: Public Function ЗапятаяНаКонце(stroka As String) As Stri Потом когда запускаю, ну никак не хочет работать! Почему? |
neznaiy Участник |
Дата: 29 Дек 2008 18:29 сам ведь понял! 1 - закралась досадная опечатка: ЗапятаяНаКонце = Left(stroka, Len(stroka - 1)) а должно быть ЗапятаяНаКонце = Left(stroka, Len(stroka) - 1)! И ещё: Call SetWindowPos(params(1), params(1), 67, 67, params(2), params(3 ), SWP_NOMOVE) Call SetWindowPos(params(1), form1.hwnd, 67, 67, params(2), params(3 ), SWP_NOMOVE) |
neznaiy Участник |
Дата: 29 Дек 2008 18:35 ещё один вопрос: Я усовершенствовал функцию: Public Function ÇàïÿòàÿÍàÊîíöå(stroka As String) As String If Right(stroka, 1) = "," Then If Left(stroka, 1) And Right(stroka, 1) = "@" Then Else ÇàïÿòàÿÍàÊîíöå = Left(stroka, Len(stroka) - 1) End If End If End Function здесь как видно я поставил распознавание переменных. тоько как ими пользоваться? чтобы @переменная@ = ........ как сохранить это значение в памяти? Ведь нельзя же прописать Dim (params(0)) as string. |
Admin Администратор |
Дата: 30 Дек 2008 02:47 neznaiy Возьми лучше за основу движок GPScript. Зачем изобретать велосипед с нуля? |