Форум
Написать нам
  • Страница 1 из 1
  • 1
Модератор форума: as-master  
Путь копирования
MorseliotДата: Понедельник, 24 Января 2011, 23:41 | Сообщение # 1
Поднаторевший
Группа: Проверенные
Сообщений: 77
Репутация: 0
Награды: 0
Статус: Offline
Всем привет!

Ситуация такая, есть переменные, надо исходя из них составить правильный код для копирования файла из одного места в другое( заранее установленное пользователем) ВОТ код:

Code
Path$=CBK_OpenDir
LoadText("FolderBox","Folder$")
s$='Собственно Текст'
Message("","s$") - небольшая проверочка
rv=StrToFile(<Temp>\text.txt,s$,FALSE,FALSE)
SysCommand("CopyFile","<Temp>\text.txt,'"'+Path$+'\""'+Folder$+'\""'text.txt'"'  "  )

------------------------------
Орет что не может копирнуть!
Я с этими ковычками двойными и одинарными уже ток че не перебробывал, в тупике полном! :(
Может кто видит в чем дело?

-------
Разобрался, заработало...

Теперь проблема в том что незнаю как заставить выполнятся один из допустим пяти скриптов при соблюдении конкретных значений...
help

Сообщение отредактировал Morseliot - Вторник, 25 Января 2011, 12:09
 
YURIYДата: Вторник, 25 Января 2011, 18:12 | Сообщение # 2
Злостный админ
Группа: Администраторы
Сообщений: 3018
Репутация: 71
Награды: 28
Статус: Offline
Quote (Morseliot)
Я с этими ковычками двойными и одинарными уже ток че не перебробывал, в тупике полном!

Такие пути советую писать в отдельной переменной, и потом, для проверки правильности, её содержимое можно вывести с помощью Message.

Quote (Morseliot)
Теперь проблема в том что незнаю как заставить выполнятся один из допустим пяти скриптов при соблюдении конкретных значений...

Недостаточно информации для помощи.



Вечная память Андрею Сергееву!
 
MorseliotДата: Вторник, 25 Января 2011, 18:58 | Сообщение # 3
Поднаторевший
Группа: Проверенные
Сообщений: 77
Репутация: 0
Награды: 0
Статус: Offline
Вот в общем в чем дело.

Допустим есть парочка значений, к примеру: A, B, C... которые равны нулю.
В случае выполнения какх-то условий(нажатия на кнопки), ноль превращается в еденицу.
Вопрос.
Как будет выглядить скрипт, если есть кнопка CHEcK, при нажатии которой будет она поидее должна проверить данные буковки со всего проекта?
Пожалуйста не смейтесь, это тут мои пробы так сказать), код вглядит так пока)
--------------------------------

Code
Check=(B=1 | N=1 | D=1)
If (Check=TRUE) Then
RunScript("Full")
Else
Message("Check not valid","")
End

Check1=(B=1 | N=0 | D=0)
If (Check1=TRUE) Then
RunScript("B")
Else
Message("Check1 not valid","")
End

Check2=(B=1 | N=0 | D=1)
If (Check2=TRUE) Then
RunScript("BD")
Else
Message("Check2 not valid","")
End

Ит.д...

Вот в общем то задача, проштудировал по поиску, но подобного не увидел...

P.S Кстати Юрий. я как -то выкладывал свою "ИГРУ"), а коментария так и не услышал, или это и есть реакция, что даже от коментария пришлось воздержаться?)

 
YURIYДата: Вторник, 25 Января 2011, 19:34 | Сообщение # 4
Злостный админ
Группа: Администраторы
Сообщений: 3018
Репутация: 71
Награды: 28
Статус: Offline
Quote (Morseliot)
Как будет выглядить скрипт, если есть кнопка CHEcK, при нажатии которой будет она поидее должна проверить данные буковки со всего проекта?

Всё равно не понял, в чём проблема. Или вопрос стоит по-другому: можно ли оптимизировать этот сценарий?

Morseliot, убедительная просьба заключать код в теги code! Сколько уже можно мне это править?




Вечная память Андрею Сергееву!
 
MorseliotДата: Вторник, 25 Января 2011, 19:48 | Сообщение # 5
Поднаторевший
Группа: Проверенные
Сообщений: 77
Репутация: 0
Награды: 0
Статус: Offline
Так вот как?

Задача состоит в том что-бы кнопка чек, проверяла, какой букве принадлежит какое значение, а уже исходя из результатов запускала нужный нам скрипт.
К примеру есть древо настроек

a=1 или 0 ( вкл и выкл звук)
b=1 или 0 (полноэкранный режим, или оконный)
с=1 или 0 ( показать время или не показывать)

Есть кнопка Запуск, которая запускает нам определенный скрипт, допустим, при нажатии она увидела что a=1 b=1 c=1, то запустила скрипт ABC, если a=1 b=0 c=0, то запускает срипт A, и т.д

Так как внедрить проверку в это кнопку что-бы при четких соблюдений условий она запустила нужный нам скрипт, а при не совпадании проводила проверку дальше.

Code
check= a=1 | b=1 | c=1
If (check=true ) then
Runscript("ABC")
Break()
else
End
check2= a=1 | b=0 | c=0
If (check2=true) then
Runscript("A")
else
end

и т.д

не работает ...

Сообщение отредактировал Morseliot - Вторник, 25 Января 2011, 20:18
 
DEMBELДата: Вторник, 25 Января 2011, 21:54 | Сообщение # 6
Наш дизайнер
Группа: Модераторы
Сообщений: 2266
Репутация: 135
Награды: 32
Статус: Offline
Code
If (a=1 & b=1 & c=1) Then
   RunScript("ABC")
   Return()
End
If (a=1 & b=0 & c=0) Then
   RunScript("A")
   Return()
End
If (a=0 & b=1 & c=0) Then
   RunScript("B")
   Return()
End

почитайте хелп про Return() и Break() и условия множественного выбора & и | (и/или)




Win7x64 SP1 Neobook v5.70 (Trial)
WinXP SP3 Neobook v5.62
 
MorseliotДата: Вторник, 25 Января 2011, 22:56 | Сообщение # 7
Поднаторевший
Группа: Проверенные
Сообщений: 77
Репутация: 0
Награды: 0
Статус: Offline
ТО ЧТО НУЖНоб СПАСИБО DEMBEl! Читал, но не нашел! Вот
Quote (DEMBEL)
условия множественного выбора & и | (и/или)
как раз и интерисовалО ! THNX !
 
YURIYДата: Вторник, 25 Января 2011, 22:57 | Сообщение # 8
Злостный админ
Группа: Администраторы
Сообщений: 3018
Репутация: 71
Награды: 28
Статус: Offline
DEMBEL, а зачем здесь Return? scratch


Вечная память Андрею Сергееву!
 
DEMBELДата: Среда, 26 Января 2011, 00:08 | Сообщение # 9
Наш дизайнер
Группа: Модераторы
Сообщений: 2266
Репутация: 135
Награды: 32
Статус: Offline
не знаю, спроси Morseliot, видимо он хотел при совпадении условия прерывать дальнейшие проверки чтоли...



Win7x64 SP1 Neobook v5.70 (Trial)
WinXP SP3 Neobook v5.62
 
YURIYДата: Среда, 26 Января 2011, 00:14 | Сообщение # 10
Злостный админ
Группа: Администраторы
Сообщений: 3018
Репутация: 71
Награды: 28
Статус: Offline
DEMBEL, конкретно в твоём коде Return вообще ни к чему.

Нужное условие выполнилось, остальные будут ложными и код в них проигнорируется. Если этим самым вы просто уменьшаете число проверок - это маразм. Выгадывание среди трёх условных операторов двух микросекунд :)

Если резюмировать, человек просто не разобрался с правильным составлением условия. А далее уже - всё просто.



Вечная память Андрею Сергееву!
 
  • Страница 1 из 1
  • 1
Поиск: