VPF::Как усечь слева подкаталоги? - Форум программистов

GremlinProg

Дата 15.5.2009, 19:00 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Комодератор
Сообщений: 2706
Регистрация: 9.8.2005
Где: Тюмень

Репутация: 99
Всего: 106

по крайней мере, можно просто учесть шрифт:

Код


...
hOldFont   = ::GetCurrentObject(hdc,OBJ_FONT);
hFont = (HFONT)::SendMessage(hwndStatic,WM_GETFONT);
::SelectObject(hdc,hFont);
// ...использовать hdc...
::SelectObject(hdc,hOldFont);
...

тогда пойдет любой HDC, хоть десктопа: GetDC(HWND_DESKTOP)

Добавлено через 3 минуты и 49 секунд

Цитата(artsb @ 15.5.2009, 20:56

)

Скорее всего она учитывает шрифт...

да нет, ей в принципе без разницы на чем рисовать
шрифт с окна функции GDI сами не устанавливают,
иначе мы не могли бы его сменить, кроме как явной посылкой WM_SETFONT

--------------------

"Гений всегда разумнее, чем умнее. Ум — это машина, разум — водитель этой машины."

artsb

Дата 15.5.2009, 19:11 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2280
Регистрация: 17.7.2007
Где: центр Вселенной

Репутация: 5
Всего: 64

Вот:

Код


AnsiString EllipsisPath(const AnsiString &asString, TFont *fParentFont, int iParentWidth, TCanvas *cCanvas)
{
AnsiString asNewString = asString;
TFont *fTempFont = cCanvas->Font;
cCanvas->Font->Assign(fParentFont);
if(iParentWidth < cCanvas->TextWidth(asNewString))
{
  while(iParentWidth < cCanvas->TextWidth("..." + asNewString))
    asNewString.Delete(1, 1);
  asNewString = "..." + asNewString;
}
cCanvas->Font->Assign(fTempFont);
return asNewString;
}

// юзать можно так
StaticText1->Caption = EllipsisPath(Edit1->Text, StaticText1->Font, StaticText1->BoundsRect.Width(), this->Canvas);

Конечно можно было создать объект канвы в функции и юзать его, но это же время и ресурсы smile

ЗЫ не смотря на то, что это изврат, не бейте сильно smile

--------------------

Чем отличается умный человек от мудрого?
Умный - выпутается из любой ситуации.
Мудрый - просто в неё не попадёт.

GremlinProg

Дата 15.5.2009, 19:17 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Комодератор
Сообщений: 2706
Регистрация: 9.8.2005
Где: Тюмень

Репутация: 99
Всего: 106

Цитата(artsb @ 15.5.2009, 21:11

)

while(iParentWidth < cCanvas->TextWidth("..." + asNewString))
asNewString.Delete(1, 1);
asNewString = "..." + asNewString;

это делает DrawText с флагом DT_END_ELLIPSIS или пословно, с флагом DT_WORD_ELLIPSIS
только не "три точки", а "троеточие", одним символом

Добавлено через 1 минуту и 59 секунд
а, ну да, не заметил, не последние, а первые символы
но в любом случае, это не задача топика

--------------------

"Гений всегда разумнее, чем умнее. Ум — это машина, разум — водитель этой машины."

artsb

Дата 15.5.2009, 19:44 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2280
Регистрация: 17.7.2007
Где: центр Вселенной

Репутация: 5
Всего: 64

Цитата(GremlinProg @ 15.5.2009, 19:17

)

это не задача топика

Цитата

Как усечь слева подкаталоги? Если строка не вмещается.

Или я не правильно понял?

--------------------

GremlinProg

Дата 15.5.2009, 21:31 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Комодератор
Сообщений: 2706
Регистрация: 9.8.2005
Где: Тюмень

Репутация: 99
Всего: 106

Цитата(artsb @ 15.5.2009, 21:44

)

Или я не правильно понял?

Цитата(artsb @ 15.5.2009, 21:44

)

Как усечь слева подкаталоги? Если строка не вмещается.

не символы, а подкаталоги:

Код


С:\усеченный\...\путь\до\файла

два варианта уже предложены

--------------------

"Гений всегда разумнее, чем умнее. Ум — это машина, разум — водитель этой машины."

artsb

Дата 15.5.2009, 23:18 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2280
Регистрация: 17.7.2007
Где: центр Вселенной

Репутация: 5
Всего: 64

Изначально я думал, что нужно получить строку вида:

Код


...\путь\до\файла

Если это так, то ничего не мешает добавить в моей функции пару строк: smile

Код


AnsiString EllipsisPath(const AnsiString &asString, TFont *fParentFont, int iParentWidth, TCanvas *cCanvas)
{
AnsiString asNewString = asString;
TFont *fTempFont = cCanvas->Font;
cCanvas->Font->Assign(fParentFont);
if(iParentWidth < cCanvas->TextWidth(asNewString))
{
  while(iParentWidth < cCanvas->TextWidth("..." + asNewString))
    asNewString.Delete(1, 1);
  int iPos = asNewString.Pos("\\");
  if(iPos)
    asNewString.Delete(1, iPos - 1);
  else if((iPos = asNewString.Pos("/")))
    asNewString.Delete(1, iPos - 1);
  asNewString = "..." + asNewString;
}
cCanvas->Font->Assign(fTempFont);
return asNewString;
}

Если же нужен такой вариант как написал GremlinProg, то как мне кажется, DrawText будет в самый раз smile

--------------------

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| C/C++: Системное программирование и WinAPI \| Следующая тема »