| Предыдущая тема :: Следующая тема | 
	
	
		| Автор | Сообщение | 
	
		| tveritin 
 
 
 Зарегистрирован: 26.01.2016
 Сообщения: 198
 Откуда: Санкт-Петербург
 
 | 
			
				|  Добавлено: Чт Апр 22, 2021 08:09    Заголовок сообщения: Справочник по x-языку |   |  
				| 
 |  
				| Привет всем. Кто может поделиться справочником?
 Интересуют вопросы:
 1. Есть строка из N символов. Как обратиться к любому из ее символов?
 2. Нумерация элементов массива или символов строки ведется с 0 или 1 ?
 
 В частности, верна ли эта конструкция?
 
 
  	  | Код: |  	  | fINN = “770500812345”;  -- 12 знаков lenINN = 12;
 Ws=Wb.WorkSheets(“SZV1”);
 n = 0
 while  (n < lenINN)  then {
 Ws.Cells(9, 13 + n*3) = fINN[n];
 n = n + 1;
 };
 | 
 |  | 
	
		| Вернуться к началу |  | 
	
		|  | 
	
		| NewAge 
 
 
 Зарегистрирован: 11.06.2010
 Сообщения: 110
 
 
 | 
			
				|  Добавлено: Чт Апр 22, 2021 10:19    Заголовок сообщения: |   |  
				| 
 |  
				| Привет. В х языке вообще нет массивов. Пользуйтесь или VB или T-SQL. |  | 
	
		| Вернуться к началу |  | 
	
		|  | 
	
		| tveritin 
 
 
 Зарегистрирован: 26.01.2016
 Сообщения: 198
 Откуда: Санкт-Петербург
 
 | 
			
				|  Добавлено: Чт Апр 22, 2021 10:20    Заголовок сообщения: |   |  
				| 
 |  
				| Ну а справочник-то у кого-нибудь есть? |  | 
	
		| Вернуться к началу |  | 
	
		|  | 
	
		| NewAge 
 
 
 Зарегистрирован: 11.06.2010
 Сообщения: 110
 
 
 | 
			
				|  Добавлено: Чт Апр 22, 2021 10:24    Заголовок сообщения: |   |  
				| 
 |  
				| Есть справка в дизайнере. |  | 
	
		| Вернуться к началу |  | 
	
		|  | 
	
		| tveritin 
 
 
 Зарегистрирован: 26.01.2016
 Сообщения: 198
 Откуда: Санкт-Петербург
 
 | 
			
				|  Добавлено: Чт Апр 22, 2021 10:33    Заголовок сообщения: |   |  
				| 
 |  
				|  	  | tveritin писал(а): |  	  | В х языке вообще нет массивов | 
 Массивы и не нужны.
 Подстроки, символы строки есть?
 |  | 
	
		| Вернуться к началу |  | 
	
		|  | 
	
		| NewAge 
 
 
 Зарегистрирован: 11.06.2010
 Сообщения: 110
 
 
 | 
			
				|  Добавлено: Чт Апр 22, 2021 11:00    Заголовок сообщения: |   |  
				| 
 |  
				|  	  | Код: |  	  | Let fINN := '770500812345';
 Let lenINN := 12;
 VB {
 Set Ws=Wb.WorkSheets(“SZV1”).Select
 };
 Alias _xWS_ == VB.Ws;
 Let n := 0;
 While(n < lenINN) Then {
 Let _xCh_ = SubString(fINN[''], n + 1, 1);
 _xWS_.Cells(9, 13 + n*3).Value = fINN[n];
 Let n := n + 1;
 };
 
 | 
 |  | 
	
		| Вернуться к началу |  | 
	
		|  | 
	
		| tveritin 
 
 
 Зарегистрирован: 26.01.2016
 Сообщения: 198
 Откуда: Санкт-Петербург
 
 | 
			
				|  Добавлено: Чт Апр 22, 2021 11:40    Заголовок сообщения: |   |  
				| 
 |  
				| Спасибо. Доступ к босс-кадровику мне пока закрыли и нет доступа к справке.
 А задание выполнить надо было.
 |  | 
	
		| Вернуться к началу |  | 
	
		|  | 
	
		| DUCKKK Большой шоколадный орден
 
  
 
 Зарегистрирован: 16.09.2009
 Сообщения: 1698
 
 
 | 
			
				|  Добавлено: Чт Апр 22, 2021 12:37    Заголовок сообщения: |   |  
				| 
 |  
				| Напишите на dkochkin@bosshr.ru - вышлю отдельным файлом справку. |  | 
	
		| Вернуться к началу |  | 
	
		|  | 
	
	
	
	
		|  |