Найдено 20 результатов
Перейти к расширенному поиску
- Mushroomer
- 13.03.2018 16:20:48
- Форум: Общее
- Тема: Класс TProcess
- Ответы: 5
- Просмотры: 17075
Вот спасибо.
Доберусь до компьютера попробую.
----------------------------------------------------------------------
Всё заработало. Спасибо.

- Mushroomer
- 13.03.2018 13:59:52
- Форум: Общее
- Тема: Класс TProcess
- Ответы: 5
- Просмотры: 17075
Беда в том, что мне надо под Linux.
Нужно чтобы командный интерпретатор выполнил ip link.
- Mushroomer
- 13.03.2018 11:54:36
- Форум: Общее
- Тема: Класс TProcess
- Ответы: 5
- Просмотры: 17075
При использовании CommandLine (deprecated) вопросов нет.
AProcess.CommandLine := 'ip link';
AProcess.Options := AProcess.Options + [poWaitOnExit, poUsePipes];
AProcess.Execute;
sl.LoadFromStream(AProcess.Output); // sl - TStringList
if sl.count > 0 then ...
- Mushroomer
- 21.12.2017 15:36:35
- Форум: Lazarus
- Тема: StringGrid и FormResize
- Ответы: 34
- Просмотры: 28231
А как бы вы решили такую задачу (к первому вопросу отношения не имеет).
Условно есть StringGrid с 20 колонками. У всех 20 разная ширина.
Нужно чтобы при изменении ширины формы ширина колонок изменялась пропорционально, полностью заполняя ClientWidth.
Когда-то в delphi я делал примерно так (возможно ...
- Mushroomer
- 21.12.2017 13:03:39
- Форум: Lazarus
- Тема: StringGrid и FormResize
- Ответы: 34
- Просмотры: 28231
vitaly_l писал(а):Вы, до сих пор не поняли где именно нужно указать StringGrid1.Repaint.
Вы должны делать скидку на то, что не все люди умны так как Вы.
StringGrid1.Repaint я прописывал здесь.
Код: Выделить всё
procedure TForm1.TabSheet4Show(Sender: TObject);
begin
StringGrid1.Repaint;
end;
- Mushroomer
- 21.12.2017 12:27:42
- Форум: Lazarus
- Тема: StringGrid и FormResize
- Ответы: 34
- Просмотры: 28231
alexs писал(а):alexs » 21.12.2017 13:46:41
Большое спасибо!
vitaly_l писал(а):на onShow StringGrid1.Refresh;
- это первое, что я пробовал.
- Mushroomer
- 21.12.2017 11:22:24
- Форум: Lazarus
- Тема: StringGrid и FormResize
- Ответы: 34
- Просмотры: 28231
vitaly_l писал(а):И у меня получилось на одну строку меньше кода.
Не знаю почему, но ваш вариант у меня не работает.
Lazarus 1.8.0 r56594 FPC 3.0.4 i386-win32-win32/win64
Не работает FormResize(Self);
Второй вариант в норме.
- Mushroomer
- 21.12.2017 10:52:43
- Форум: Lazarus
- Тема: StringGrid и FormResize
- Ответы: 34
- Просмотры: 28231
то заметили бы разницу между: Show и onShow для TabSheet
Признаю, что написал не правильно, конечно я имел ввиду событие onShow для TabSheet.
Повторяю, постарайтесь заметить разницу, между Show и onShow - ушел в магазин за учебником, а вы проверьте пока на деле как ваш совет работает.
Кстати ...
- Mushroomer
- 21.12.2017 09:28:53
- Форум: Lazarus
- Тема: StringGrid и FormResize
- Ответы: 34
- Просмотры: 28231
Ну там же есть onShow для каждой TabSheet! Вот в этот onShow для TabSheet, на которой лежит StringGrid - сделайте вызов функции onResaze
Друг мой, если бы вы внимательно читали то, что я писал ранее, вы бы заметили, что я пробовал такой вариант с отрицательным результатом.
Кстати, можно просто ...
- Mushroomer
- 20.12.2017 21:42:55
- Форум: Lazarus
- Тема: StringGrid и FormResize
- Ответы: 34
- Просмотры: 28231
Печально, но в delphi xe6 это работает без всякого гемороя. Будем искать ...
Добавлено спустя 20 минут 9 секунд:
В событии PageControl1MouseDown прописал
StringGrid1.ColWidths[2] := StringGrid1.ClientWidth - StringGrid1.ColWidths[0] - StringGrid1.ColWidths[ ...
- Mushroomer
- 20.12.2017 18:21:14
- Форум: Lazarus
- Тема: StringGrid и FormResize
- Ответы: 34
- Просмотры: 28231
Естественно не изменила
Мне почему-то кажется, что это противоестественно.
Событие FormResize происходит не зависимо от того на какой вкладке PageControl-а я нахожусь. А в событии FormResize написано
StringGrid1.ColWidths[2] := StringGrid1.ClientWidth - StringGrid1. ...
- Mushroomer
- 20.12.2017 13:54:04
- Форум: Lazarus
- Тема: StringGrid и FormResize
- Ответы: 34
- Просмотры: 28231
Здравствуйте.
Есть PageControl с несколькими TabSheet-ами, на одном из которых лежит StringGrid.
В событии FormResize:
StringGrid1.ColWidths[2] := StringGrid1.ClientWidth - StringGrid1.ColWidths[0] - StringGrid1.ColWidths[1];
Если активен TabSheet с ...
- Mushroomer
- 13.12.2017 17:21:43
- Форум: Lazarus
- Тема: Работа с микросхемами от FTDI через интерфейс D2XX в Linux.
- Ответы: 14
- Просмотры: 12269
kolyacher » 13.12.2017 18:14:18 Может этот проект поможет?
Проект весьма интересный для изучения, спасибо.
В общем-то я разобрался. В FT245 были записаны не дефолтные VID, PID. В Windows это по барабану, а в Linux необходимо подключать пользовательскую комбинацию с помощью FT_SetVIDPID.
unit ...
- Mushroomer
- 13.12.2017 12:11:54
- Форум: Lazarus
- Тема: Работа с микросхемами от FTDI через интерфейс D2XX в Linux.
- Ответы: 14
- Просмотры: 12269
Всем спасибо за полученные знания (особенно wofs).
Беру тайм-аут.
Подключил к ПК другое устройство на FT232RL - все работает и драйвер VCP и D2XX.
Первое устройство, с которым я мучался, собрано с использованием FT245, работает в Windows и не работает в Linux.
Пошёл думать.