[MIKE11]

как привязать Scrollbar к listbox для горизонтальной прокрутки

и да , как чтоб при сохранении файла маска файла автоматически добавлялась?

[MIKE11]

Неуж-то никто не знает ?
подскажите как хотя бы привязать маску к сохраняемому объекту ?
DialogSave1
где фильтры на объекты ставить нашел и где имя автоматически приводить в строке , тоже , но хочется чтоб при написании имени объекта (в данном случае текстового файла) без указания расширения или указания иного отличного от *.txt оно автоматически дописывало в имени файла нужное

конечно есть идея в самой программе реализовать через обращение к имени файла , но как реализовать точно не знаю , да и хочется попроще

[angvelem]

Справочка, справка, справище. Здесь помогают в решении кода, в поиске ошибке в коде, но никак в обучении основам Дельфи.

[Vocabulary]

Согласен - справочки надо читать - очень полезно, знаете ли.
В нашем запущенном случае, например, про свойство ScrollWidth.

[NumLock]

Код:

SaveDialog1.DefaultExt:='txt';

[MIKE11]

спасиб всем сам как-то разобрался с присобачиванием маски к сохраняемому файлу , а вот с кроллбаром так и не понял к чему привязать scrollwidth , но нашел вот это

Код:

procedure TForm1.FormCreate(Sender: TObject);  
var  
  i, MaxWidth: integer;  
begin  
  MaxWidth := 0;  
  for i := 0 to LB1.Items.Count - 1 do  
  if MaxWidth < LB1.Canvas.TextWidth(LB1.Items.Strings[i]) then  
    MaxWidth := LB1.Canvas.TextWidth(LB1.Items.Strings[i]);  
  SendMessage(LB1.Handle, LB_SETHORIZONTALEXTENT, MaxWidth+2, 0);  
end;

Приведённый код определяет ширину в пикселях самой длинной строки списка. Затем он использует сообщение LB_SETHORIZONTALEXTENT, чтобы установить ширину горизонтального скролбара в пикселях. Два дополнительных пикселя добавленные к MaxWidth служат для стрелки в правом углу list box-а.

хотя мне кажется здесь можно и попроще сделать , но scrollwidth - ширина в пикселях , что явно усложняет
И да , парой под рукой нет справочника ,а с телефона вычитывать особого удовольствия не доставляет , особенно когда ищешь не зная что именно тебе искать... тем более написать два слова "свой-во DefaultEx" не требует много времени и затрат

[angvelem]

Написать подсказку несложно, но она мало что даёт мозгу, такая подсказка не запоминается. А вот покопался в поиске, поискал, теперь наверняка запомнишь. Справку всё-таки поставь, поможет.