Einzelnen Beitrag anzeigen

Benutzerbild von Jan
Jan

Registriert seit: 24. Sep 2002
Ort: Magdeburg
491 Beiträge
 
Delphi 7 Enterprise
 
#4
  Alt 6. Mär 2003, 14:05
Hallo Chris,
dazu wirst du wohl (soweit ich das sagen kann) das onresize des Hauptformulars nehmen müssen und anhand der neuen Breite die Memos einzeln resizen. Angenommen die vier Memos sind von links nach rechts und von oben nach unten so durchnummeriert:
1 2
3 4
dann wirst du dem 1. memofeld beim resize keine neue position, sondern nur eine neue breite zuweisen müssen. Da die Breite und Höhe bei allen Memos ja gleich bleiben soll, sähe das ganze dann so aus:

Code:
memox.width:=(form1.width/2)- [linker rand + ((dist.zwischen linkem und rechtem memo)/2)];
Code:
memox.height:=(form1.height/2)-[((dist.zwischen oberem und unterem memo)/2)+obererrand];
für memo2 musst du auch die Position angleichen:

Code:
memo2.left:=(form1.width/2)+((dist.zwischen linkem und rechtem memo)/2);
top entfällt.


memo3(posi):

Code:
memo3.top:=(form1.height/2)+((dist.zwischen oberem und unterem memo)/2);
left bleibt gleich


memo4(top):

Code:
memo4.top:=(form1.height/2)+((dist.zwischen oberem und unterem memo)/2);
memo4(left):

Code:
memo4.left:=(form1.width/2)+((dist.zwischen linkem und rechtem memo)/2);
ich hoffe das hilft weiter
Gruß
Jan
Jan
Wenn die Sonne der Kultur tief steht, werfen auch kleine Gestalten lange Schatten.
  Mit Zitat antworten Zitat