Программирование на Атлантисе (VIP, FCOM, ARD), FastReport
	Модераторы:  m0p3e , edward_K , Модераторы 
			
		
		
			
				
																			
								Свои 							 
									
		Сообщения:  8  		Зарегистрирован:  16 ноя 2005, 09:05 		
		
						
						
		 
		
						
					
													
							
						
									
						Сообщение 
					 
								 Свои   »  16 ноя 2005, 09:15 
			
			
			
			
			
			Привет Всем! 
к Pervsive-у подключаюсь с компонентами Titan через Delphi5.
подскажите как решить проблему с числами Int64 (nrec).
Например как сделать поиск по nrec-у?
пробовал так: KatMC.Locate('nrec',4640000000000005899,[])
не компилируеть, выдаеть Incompatible types: 'Variant' and 'Int64'.
а если передать как строку, ничего не находит 
.
 
			
			
									
						
										
						 
		 
				
		
		 
	 
				
		
		
			
				
																			
								Max_Fin 							 
						На пенсии 			
		Сообщения:  797  		Зарегистрирован:  29 мар 2005, 17:49 		
		
																Откуда:  г. Тюмень 
							
							
				Контактная информация: 
				
			 
				
		 
		
						
					
						 
		 
													
							
						
									
						Сообщение 
					 
								 Max_Fin   »  16 ноя 2005, 10:32 
			
			
			
			
			
			так пробовали
Код: Выделить всё 
var
     V: Variant;
begin
        V :=4640000000000005899;
        KatMC.Locate('nrec',V,[]);
end;
Правда, сам не работал с компонентами, поэтому не могу определенно сказать что происходит при передаче данных типа Comp.
 
			
			
									
						
							Жду выхода Вселенная 2.12!
			
						 
		 
				
		
		 
	 
				
		
		
			
				
																			
								san 							 
						Местный житель 			
		Сообщения:  412  		Зарегистрирован:  28 апр 2005, 11:34 		
		
											Откуда:  Галактика Млечный Путь 
							
						
		 
		
						
					
						 
		 
													
							
						
									
						Сообщение 
					 
								 san   »  16 ноя 2005, 11:11 
			
			
			
			
			
			а мы пробовали Pervasive Data Access Component (PDAC) для Delphi и тоже не работает с comp, отсюда вывод - в галактике драйвер лучше  
 
			
			
									
						
										
						 
		 
				
		
		 
	 
				
		
		
			
				
																			
								Свои 							 
									
		Сообщения:  8  		Зарегистрирован:  16 ноя 2005, 09:05 		
		
						
						
		 
		
						
					
						 
		 
													
							
						
									
						Сообщение 
					 
								 Свои   »  16 ноя 2005, 11:32 
			
			
			
			
			
			Max_Fin писал(а): так пробовали
Код: Выделить всё 
var
     V: Variant;
begin
        V :=4640000000000005899;
        KatMC.Locate('nrec',V,[]);
end;
Правда, сам не работал с компонентами, поэтому не могу определенно сказать что происходит при передаче данных типа Comp.
Пробовал, выдает ту же ошибку...
 
			
			
									
						
										
						 
		 
				
		
		 
	 
				
		
		
			
				
																			
								Свои 							 
									
		Сообщения:  8  		Зарегистрирован:  16 ноя 2005, 09:05 		
		
						
						
		 
		
						
					
						 
		 
													
							
						
									
						Сообщение 
					 
								 Свои   »  16 ноя 2005, 11:47 
			
			
			
			
			
			Можеть какая то функция есть, 
Int64ToVariant или еще что-то такое?
			
			
									
						
										
						 
		 
				
		
		 
	 
				
		
		
			
				
																			
								Max_Fin 							 
						На пенсии 			
		Сообщения:  797  		Зарегистрирован:  29 мар 2005, 17:49 		
		
																Откуда:  г. Тюмень 
							
							
				Контактная информация: 
				
			 
				
		 
		
						
					
						 
		 
													
							
						
									
						Сообщение 
					 
								 Max_Fin   »  16 ноя 2005, 12:07 
			
			
			
			
			
			Я ж написал код, какая еще функциональность требуется
			
			
									
						
							Жду выхода Вселенная 2.12!
			
						 
		 
				
		
		 
	 
				
		
		
			
				
																			
								Свои 							 
									
		Сообщения:  8  		Зарегистрирован:  16 ноя 2005, 09:05 		
		
						
						
		 
		
						
					
						 
		 
													
							
						
									
						Сообщение 
					 
								 Свои   »  16 ноя 2005, 12:41 
			
			
			
			
			
			Max_Fin писал(а): Я ж написал код, какая еще функциональность требуется
Я пробовал так написать, но
при присвоении
V :=4640000000000005899; 
при компиляции выдает ту же  ошибку: 
Incompatible types: 'Variant' and 'Int64' .............
 
			
			
									
						
										
						 
		 
				
		
		 
	 
				
		
		
			
				
																			
								Свои 							 
									
		Сообщения:  8  		Зарегистрирован:  16 ноя 2005, 09:05 		
		
						
						
		 
		
						
					
						 
		 
													
							
						
									
						Сообщение 
					 
								 Свои   »  16 ноя 2005, 17:36 
			
			
			
			
			
			как же быть ааааа...............
			
			
									
						
										
						 
		 
				
		
		 
	 
				
		
		
			
				
																			
								Свои 							 
									
		Сообщения:  8  		Зарегистрирован:  16 ноя 2005, 09:05 		
		
						
						
		 
		
						
					
						 
		 
													
							
						
									
						Сообщение 
					 
								 Свои   »  17 ноя 2005, 09:42 
			
			
			
			
			
			Оказываеться в D5 -ом ругаеться на 
V :=4640000000000005899
а в Д6 и Д7 -ом нормально присваивает 
теперь проблема в следующем, делаю:
  V :=4640000000000005899; 
  KatMC.Locate('nrec',V,[]); 
и тут выдаеть ошибку:
Cannot access field 'NREC' as type Variant.
кто нибудь сталкивался с таким?
 
			
			
									
						
										
						 
		 
				
		
		 
	 
				
		
		
			
				
																			
								AlexPK 							 
									
		Сообщения:  7  		Зарегистрирован:  13 дек 2005, 11:33 		
		
						
						
		 
		
						
					
						 
		 
													
							
						
									
						Сообщение 
					 
								 AlexPK   »  13 дек 2005, 11:42 
			
			
			
			
			
			Выкинте Titan. Два небольших патча модуля ADODB.pas из Delphi 6 или 7 и у вас практически полнофункцинальный доступ через ADO к Галактике. По крайней мере проблема nrec в TADODataset у меня решена. 
 
			
			
									
						
										
						 
		 
				
		
		 
	 
				
		
		
			
				
																			
								Свои 							 
									
		Сообщения:  8  		Зарегистрирован:  16 ноя 2005, 09:05 		
		
						
						
		 
		
						
					
						 
		 
													
							
						
									
						Сообщение 
					 
								 Свои   »  13 дек 2005, 15:27 
			
			
			
			
			
			а патча откуда взять?
			
			
									
						
										
						 
		 
				
		
		 
	 
				
		
		
			
				
																			
								AlexPK 							 
									
		Сообщения:  7  		Зарегистрирован:  13 дек 2005, 11:33 		
		
						
						
		 
		
						
					
						 
		 
													
							
						
									
						Сообщение 
					 
								 AlexPK   »  13 дек 2005, 15:39 
			
			
			
			
			
			Пропатчить самим. Я патчил сам. Могу поделиться