Найдено 18 результатов

alien308
08.11.2017 10:58:28
Форум: Free Pascal Compiler
Тема: Копирование объектов TStringList
Ответы: 11
Просмотры: 13547

Re: Копирование объектов TStringList

Для тех кто в танке непонятно. Спасибо.
alien308
08.11.2017 10:12:49
Форум: Free Pascal Compiler
Тема: Копирование объектов TStringList
Ответы: 11
Просмотры: 13547

Re: Копирование объектов TStringList

Спасибо ответившим, BeginUpdate, EndUpdate, что делают? Всегда Add ,без них делал.
alien308
07.11.2017 21:31:49
Форум: Free Pascal Compiler
Тема: Копирование объектов TStringList
Ответы: 11
Просмотры: 13547

Re: Копирование объектов TStringList

В си крест на крест, не к ночи помянуто, есть присваювающий конструктор. Он выполняется при присваивании и копирует содержимое одного объекта в другой. А тут при присваивании просто копируется указатель/ссылка (как правильно?), получается один объект с двумя именами. Изменяя объект с одним именем мы ...
alien308
07.11.2017 21:09:51
Форум: Free Pascal Compiler
Тема: Копирование объектов TStringList
Ответы: 11
Просмотры: 13547

Копирование объектов TStringList

С ужосом узнал что нет копирования объектов. Всё ручками? Где гуманизм
Или всё таки ныне можно скопировать?
Как правильно копировать отсортированный TStringList? Сначала построчно в не отсортированную копию, а потом поставить Sorted в True или сразу фигачить в отсортированную копию? При установке ...
alien308
07.11.2017 16:03:19
Форум: Free Pascal Compiler
Тема: Сравнение двух TStringList на совпадение строк
Ответы: 13
Просмотры: 18367

Re: Сравнение двух TStringList на совпадение строк

Добавить списки к списку можно одной операцией или цикл нужен?
alien308
07.11.2017 09:11:27
Форум: Free Pascal Compiler
Тема: Сравнение двух TStringList на совпадение строк
Ответы: 13
Просмотры: 18367

Re: Сравнение двух TStringList на совпадение строк

Так N квадрат времени надо, лучше отсортировать и на соответсвующих позициях сравнивать. Есть ли способ турусы не разводить?
alien308
07.11.2017 08:08:06
Форум: Free Pascal Compiler
Тема: Сравнение двух TStringList на совпадение строк
Ответы: 13
Просмотры: 18367

Сравнение двух TStringList на совпадение строк

Как правильно сравнить два объекта TStringList на совпадение строк? Количество строк одинаковое, порядок может отличатся. Повторяющихся строк нет.
alien308
06.11.2017 22:28:33
Форум: Free Pascal Compiler
Тема: Получить список COM портов
Ответы: 11
Просмотры: 29606

Re: Получить список COM портов

Спасибо. Простое и очевидное решение - признак мастерства.
alien308
06.11.2017 21:54:35
Форум: Free Pascal Compiler
Тема: Tstrings вызывает SIGSEGV
Ответы: 2
Просмотры: 4462

Tstrings вызывает SIGSEGV

сообщение о ошибке:
Проект project1 вызвал класс исключения 'External: SIGSEGV'.
В файле 'unit1.pas' на строке 39:
n := ports.Count;


код
unit Unit1;

{$mode objfpc}{$H+}

interface

uses
Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs;

type

{ TForm1 ...
alien308
06.11.2017 21:26:08
Форум: Free Pascal Compiler
Тема: Получить список COM портов
Ответы: 11
Просмотры: 29606

Re: Получить список COM портов

Тогда, неправильный. Я ещё смотрю в сторону BaseUnix, там похоже много всего хорошего.
P. S. Вы ничего не видите, потому что Arduino не подсоединили! Так и задумано.
alien308
06.11.2017 16:48:07
Форум: Free Pascal Compiler
Тема: Получить список COM портов
Ответы: 11
Просмотры: 29606

Re: Получить список COM портов

Спасибо, пригодится.
Сделал уже так:
{ for Linux }
procedure TForm1.Read_port_list;
var
Info : TSearchRec;
Count : Longint;
begin
ComboBox1.Items.Clear;
Count := 0;
if FindFirst('/dev/tty???*', faAnyFile, Info)=0 then
begin
repeat
inc(Count);
with Info do
begin ...
alien308
06.11.2017 08:13:17
Форум: Free Pascal Compiler
Тема: Получить список COM портов
Ответы: 11
Просмотры: 29606

Re: Получить список COM портов

А как из команды получить результат в строку?
alien308
05.11.2017 18:32:59
Форум: Free Pascal Compiler
Тема: Получить список COM портов
Ответы: 11
Просмотры: 29606

Получить список COM портов

Как получить список COM портов для Linux. GetSerialPortNames из synaser в Linux не работает, как и написано в исходнике.
alien308
26.10.2017 22:18:29
Форум: Lazarus
Тема: TCart задание положения тиков
Ответы: 0
Просмотры: 2728

TCart задание положения тиков

Как на оси задать интервал между тиками (Marks) и положение тиков? Например чтобы тики были с координатами -2.0 1.0 0.0 2.0
alien308
26.08.2012 11:39:07
Форум: Lazarus
Тема: Управление выделением и задание цвета строк в StringGrid
Ответы: 4
Просмотры: 5032

Re: Управление выделением и задание цвета строк в StringGrid

Спасибо, разбираюсь. А это где нибудь описано, кроме исходника grids.pas? 11163 строки и ни одного комментария.