Deutsches Lazarusforum

Danke.

Das mit dem Stringgrid zeichnen will ich mir aber dennoch ersparen

Gibt es eine Möglichkeit bei einer MessageBox bzw. MessageDlg ein Ereignis aufzurufen, wenn der Benutzer das rote X oben rechts drückt?

vielen dank, michl. Endlich kann ich die Spalten anpassen ohne, dass ich diesen nervigen Bug bekomme. Habe Version 1.0.10 und nachdem ich ssnone bei scrollbars eingestellt habe, funktioniert's wunderbar.

Jetzt musst du mir nur noch verraten, ob es geht, dass jede 3. Spalte den Inhalt mittig ...

Habe mich zwischendurch mit etwas anderem beschäftigt. Hier hast du das project:

Hier die Bilder vom Test. Mir ist aufgefallen, dass wenn ich in die Zelle unten rechts klicke sogar die erste Zeile und die erste Spalte verschwinden:
Hat irgendjemand eine Ahnung, wie man das Problem beheben kann und tritt es bei euch auch auf?

Bin für jede Hilfe dankbar.

Nach dem Klicken in die unterste Zeile sieht es so aus:

Michl hat recht, über die Befehle hat es jetzt funktioniert, aber ich will nicht das der Nutzer das Stinggrid verändern kann. Also habe ich es mit der Maus editiert. Wenn ich das Programm nun aber starte, hat mein Formular diesen schwarzen Balken um das Stringgrid (siehe Bild) und es löscht die ...

Mein Fehler war, dass ich AutoFillColumns auf True gesetzt hatte. Allerdings kann der Benutzer das Stinggrid ja selbst auch verändern, wenn ich das über diese Befehle mache, da GoColSizing auf True stehen muss.

Also habe ich mein Stringgrid einfach per Maus so gezogen, wie ich es haben will. Dann ...

Ich dachte es gäbe evtl eine einfachere Lösung, denn nur für die breiteren Linien will ich mir nicht die Arbeit machen das ganze Stringgrid Zelle für Zelle selber zu zeichnen.

Wichtiger ist mir da, ob es eine einfache Lösung gibt die Spaltenbreite individuell anzupassen bzw. woran es liegen könnte ...

Hallo,

ich bin's schon wieder. Bin gerade dabei das Aussehen meiner Formulare zu überarbeiten und da wollte ich jede dritte Spalte des Stringgrids doppelt so groß machen, wie die beiden darauffolgenden, da in diesen nur eine oder zwei Ziffern stehen, aber in der anderen eine Bezeichnung. Da das ...

Vielen Dank euch beiden. Jetzt funktioniert das Speichern der Bitmap endlich auch wie es soll.

Den Link zum plattformunabhängigen Programmieren werde ich bei Gelegenheit mal lesen/überfliegen. Dann kann ich mein Programm vlt auch auf meinem Mac benutzen.

Vielen Dank für die Hilfe. Jetzt funktioniert's fast perfekt. Allerdings habe ich, wenn ich das Bild speichere unten einen schwarzen Rand, der in etwa so groß ist, wie mein MainMenu oben auf dem Formular, was ja nicht mit abgebildet wird. Wie kann ich den wegschneiden?

Und könntest du die Prozedur ...

Wenn ich deinen Quellcode implementiere, erhalte ich eine komplett schwarze Bitmap (aber immerhin kann man sie öffnen ;) ). Fehlt evtl eine Zeile, die die Bitmap in eine Graphic umwandelt oder sind die beiden so kompatibel?

Oder kann es damit zu tun haben, dass ich bei uses windows jetzt vor ...

Danke für die Antworten. Die Drucken Routine funktioniert nun Einwandfrei.

Die Speichern Routine funktioniert allerdings generell nicht. Egal, ob windows in den uses steht. Ich glaube, da ist irgendwie ein Fehler bei der Dateiendung oder so? oder liegt es daran, dass ich quasi file of bitmap ...

Hallo,

ich versuche nicht zu spamen, aber ich stehe schon wieder auf dem Schlauch..

Ich habe folgende Druck-Routine, die funktioniert hat, bis ich windows zu uses hinzugefügt habe:

procedure TFormAuswertung.BtnDruckenClick(Sender: TObject);
var
Seite: TBitmap;
begin
if not PrintDialog1.Execute ...

danke, funktioniert.