NÁMĚT: zjemnění práce zvlášť se svislými a vodorovnými čarami

dotazy uživatelů k funkcím programu Layout, náměty na jeho další rozšíření
Odpovědět
Uživatelský avatar
Tomáš Och
Member
Příspěvky: 394
Registrován: úte čer 19, 2007 4:41 pm
Bydliště: Papouch s.r.o., Praha
Kontaktovat uživatele:

NÁMĚT: zjemnění práce zvlášť se svislými a vodorovnými čarami

Příspěvek od Tomáš Och »

Možnost pracovat (Select, Unselect, Qualify,...) nejen obecně s orthogonálními čarami, ale také pouze se svislými a pouze s vodorovnými čarami.
Uživatelský avatar
Petr Horský
Member
Příspěvky: 620
Registrován: úte čer 19, 2007 12:40 pm
Bydliště: Praha
Kontaktovat uživatele:

Příspěvek od Petr Horský »

Proč ne? Do testovací verze jsem to už přidal; jakmile vystavím příští build, dám sem odkaz pro stažení.


Mezitím se případní zájemci mohou podívat, jak je to v existujícím frameworku pro množinové operace jednoduché. Znamenalo to jen přidat dvě zcela triviální procedury a dvě nové položky do stromu menu:

Kód: Vybrat vše

PROCEDURE OrthogonalLines;   far;
begin
  MarkElems ([Seg0Id, Seg90Id], EmptyQualifier);
end;

PROCEDURE HorizontalLines;   far;
begin
  MarkElems ([Seg0Id], EmptyQualifier);
end;

PROCEDURE VerticalLines;   far;
begin
  MarkElems ([Seg90Id], EmptyQualifier);
end;

PROCEDURE DiagonalLines;   far;
begin
  MarkElems ([Seg45Id, Seg135Id], EmptyQualifier);
end;

(...)

      New (ExecutablePtr_T, Init ('>Orthogonal',      H_SelOrthogonal, OrthogonalLines,
      New (ExecutablePtr_T, Init ('>Horizontal',      H_NOHELP, HorizontalLines,
      New (ExecutablePtr_T, Init ('>Vertical',        H_NOHELP, VerticalLines,
      New (ExecutablePtr_T, Init ('>Diagonal',        H_SelDiagonal, DiagonalLines,
Uživatelský avatar
Petr Horský
Member
Příspěvky: 620
Registrován: úte čer 19, 2007 12:40 pm
Bydliště: Praha
Kontaktovat uživatele:

Příspěvek od Petr Horský »

Odpovědět