0 / 0 / 0
Регистрация: 19.04.2016
Сообщений: 1
1

На android зависает программа, при компиляции на windows работает стабильно

19.04.2016, 14:19. Показов 475. Ответов 1
Метки нет (Все метки)

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
procedure TForm4.Tqueue;
var
i ,j,g:integer;
queueArray:array of array of string;
buffer: String;
fileQueue: text;
list: TstringList;
xml:Txmldocument;
m:integer;
begin
s:=1;
xml:=txmldocument.Create(self);
dmr01m.Clientset;
dmr01m.Client.Connect;
dmr01m.client.SendCmd('Queue',200);
Buffer:=dmr01m.client.LastCmdResult.Text.Text;
dmr01m.client.Disconnect;
   {   AssignFile(fileQueue,'C:\XML\Queue.XML');
      Rewrite(fileQueue);
      Writeln( fileQueue, UTF8Encode (buffer));
      CloseFile(fileQueue);
    }
 try
 xml.XML.Text := Buffer;
  xml.Active:=true;
           StringGrid1.Cells[0,0]:='№ Заявки';
           StringGrid1.Cells[1,0]:='Гараж.Номер';
           StringGrid1.Cells[2,0]:='Модель';
           StringGrid1.Cells[3,0]:='Гос.Номер';
           StringGrid1.Cells[4,0]:='Тип заявки';
           StringGrid1.Cells[5,0]:='Подача в:';
        m:=xml.DocumentElement.ChildNodes.Count;
 
   for i := 1 to m-2 do
  begin
  StringGrid1.Cells[0,i]:=VarToStr(xml.DocumentElement.ChildNodes.Nodes[i].Attributes['OrderNumber']);
  StringGrid1.Cells[1,i]:=VarToStr(xml.DocumentElement.ChildNodes.Nodes[i].Attributes['GarageNumber']);
  StringGrid1.Cells[2,i]:=VarToStr(xml.DocumentElement.ChildNodes.Nodes[i].Attributes['Model']);
  StringGrid1.Cells[3,i]:=VarToStr(xml.DocumentElement.ChildNodes.Nodes[i].Attributes['GosNumber']);
  StringGrid1.Cells[4,i]:=VarToStr(xml.DocumentElement.ChildNodes.Nodes[i].Attributes['TypeRepair']);
  StringGrid1.Cells[5,i]:=VarToStr(xml.DocumentElement.ChildNodes.Nodes[i].Attributes['DateTime']);
  end;
  except
 
 
 end;
 
   end;
end.
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
19.04.2016, 14:19
Ответы с готовыми решениями:

Зависает одна из систем компьютера, вторая работает стабильно.
На компьютере стоит две Windows XP, одна работает хорошо, а вторая два дня назад стала загружаться...

Windows работает не стабильно
принесли системник попросили поменять винду поменял уже 5 версий а откроешь что нибуть...

При компиляции программа не работает
Установила Delphi ,почему при нажатии RUN виснет программа (не отвечает)?

Сеть на Server 2003 и Windows 7 работает не стабильно
Есть сервер 2003 и 15 машин на windows 7. На 3 машинах доступ к серверу работает нестабильно:...

1
14 / 14 / 11
Регистрация: 20.03.2016
Сообщений: 168
23.04.2016, 04:00 2
sashes, ты считаешь, что компиляторы под разными ОС абсолютно идентичные?

Добавлено через 3 минуты
p.s. Какие модули ты через USES подключаешь?
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
23.04.2016, 04:00
Помогаю со студенческими работами здесь

При первой загрузке Windows 7 зависает, потом работает
Привет! Windows 7 x86 максимальная. Лицензионная на сколько это возможно :D Недавно началась...

Зависает Windows на ноутбуке, при этом Ubuntu работает нормально
Зависает ноутбук на котором установлена Windows. При чем именно Windows. Сейчас стоит Ubuntu и все...

При работе от сети Windows XP работает нормально, а от батареи зависает конкретно и надолго
что происходит с ноутом(asus)? при работе от сети Windows xp работает нормально, а от батареи...

Wi-Fi работает стабильно только при включенном в сеть (в розетку) ноутбуке
Добрый день. Собственно проблема в названии темы. Проблема появилась после установки виндовс 10....


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2022, CyberForum.ru