Delphi7 - AlignWithMargins

Delphi7 - AlignWithMargins
0

Witam. W delphi 2007 jest bardzo przydatna opcja przy komponentach wizualnych - alignwithmargins. Np. mogę zrobić by memo wypełniało całą formę, jednak tak by z każdej strony zachowało odpowiednie odstępy by wyglądało to ładniej.

W delphi 7 nie widzę tej opcji, a bardzo mi jej brakuje. Czy jest jakaś możliwość by to dodać czy jestem skazany na nowy kompilator?

Patryk27
Moderator
  • Rejestracja:ponad 17 lat
  • Ostatnio:prawie 2 lata
  • Lokalizacja:Wrocław
  • Postów:13042
0

Align?
IMO, będziesz musiał to ręcznie napisać, lub poszukać czegoś gotowego, lecz wątpię, czy znajdziesz...


edytowany 1x, ostatnio: Patryk27
SI
  • Rejestracja:prawie 15 lat
  • Ostatnio:prawie 11 lat
  • Postów:184
0

... żeby coś takiego uzyskać nie jest potrzebny ani najnowszy kompilator, ani jakiś obszerny kod. Wystarczy w procedurze **OnResize **formularza dać:

Kopiuj
procedure TForm1.FormResize(Sender: TObject);
begin
  Memo1.SetBounds(Margines, Margines, ClientWidth - 2*Margines, ClientHeight - 2*Margines);
end;

Co to jest *Margines *oczywiście wiadomo.

Zarejestruj się i dołącz do największej społeczności programistów w Polsce.

Otrzymaj wsparcie, dziel się wiedzą i rozwijaj swoje umiejętności z najlepszymi.