Hoi Hans,
Het gaat goed me je hulp. 
Nog een vraagje met een kalender werken is geenoptie. Range van geb data is van 1900 tot 2010.
Volgend prog zelf tot heden of toekomst.
Heb je een ander voorstelling?

Wil je nog een keer kijken naar de laatste versie. Loopt goed.

Hoi Hans,

Ik zoek nog iets als " OnStart" dat als het programma start dat de cursor altijd op een bepaalde positie start op een bepaald tab. Ken je dat?

Dank

Gerard

Nog een hans.
Ben toch aan de slag gegaan met TDateEdit zoals je vorostelde.

Echter als je een foute datum intikt en vervolgens op de calender druk om een goede datum te selecteren klapt die eruit.
enige idee waar ik dit kan opvangen en hoe.

I gebruik zelf zelden een datum in mijn programma's, maar als de TDateEDit niet naar wens werkt, dan kun je ook een TMaskEdit overwegen. Hierbij kun je een "Mask" opgeven voor een datum (rechts op component klikken, en dan "Edit Mask Editor" kiezen - moet je helaas wel een beetje gaan zoeken hoe je de juiste Mask definiëren moet voor een datum.

Oh en voor ik het vergeet, je kunt bij een TDateEdit de "DirectInput" property op FALSE zetten zodat de gebruiker geen foute zaken kan invoeren en dus de kalender moet gebruiken om te kiezen. (DateOrder = doYMD, misschien DeafultToday = TRUE?)

Voor wat je "OnStart" vraag. Je zou zoiets kunnen doen als:

procedure TForm1.FormShow(Sender: TObject);
begin
  if Edit1.Tag=0 then 
    begin
      Edit1.SetFocus;
      Edit1.Tag:=1;
    end;
end;

Even een korte toelichting;

Zo een beetje component heeft een "Tag" property, waarin me een integer kan opslaan. Deze property heeft geen specifiek doel en kan willekeurige gebruikt worden.

Ten tweede, in het OnCreate event bestaat Edit1 nog niet, dus het daar de focus geven zal een foutmelding produceren.

Dus ... wat ik hier doe, is dat als de Form zichtbaar wordt (OnShow), en de Edit1.Tag nul is, dan geven we Edit1 de focus en zetten we de Tag op 1.

Waarom de Tag gebruiken? Het OnShow event vuurt ook af, als een Form tijdelijke naar de achtergrond is gegaan, en dan zouden we dus ongewenst de focus naar Edit1 sturen. Vandaar dus. 

He Hans,

je hebt me fijn geholpen. ook "onstart" en datamanipulatie werken.

Dank 

Hoi Gerard!

Graag gedaan en mooi om te horen en fijn dat het behulpzaam voor je was! 

Ben benieuwd of je in de toekomst nog meer met Lazarus Pascal (of Embarcadero Delphi) gaat doen ...

Zeker weten Hans,
Nu ik het weer te pakken heb, ben ik al met diverse programma's aan het werk.

Heb ook weer commerciële aspiraties. 

Wil zeker in de zorg nog 3 programma's op de markt gaan brengen.

Het pascal is klaarblijkelijk niet weg, had een flink aantal spellen op DOS op mijn naam staan.
Nu Lazerus en Delphi leren   dan ben ik weer bij.

wil ook eens kijken of een programma voor een smartphone moeilijk is.

Groetjes
Gerard

PS Hans, wat is het verschil tussen Lazerus en Delphi in basis?

Mooi om te horen!! 

Ehm het verschil tussen Delphi en Lazarus ... de "oude" Delphi versies (b.v. Delphi 7) lijken heel erg veel op Lazarus en de code is voor het meerendeel ook uitwisselbaar.

Verschillen vinden we in:

- Nieuwere Delphi versies kunnen ook voor MacOS X, iOS en Android compileren (met wat kanttekeningen)
- Lazarus doet van nature daar nog eens Linux boven op (iOS en Android zijn wat lastiger, maar Wii of WinCE kan zelfs)
- Delphi is wat gelikter maar kost ook een paar centen
- Delphi gebruikt (voor cross-platform) componenten van Fire Monkey, die er niet alleen anders uitzien maar ook anders werken dan de standaard VLC componenten (LCL onder Lazarus)
- Delphi geeft toegang (met wat ellende als je weer gaat upgraden) tot meer commerciële componenten
- Sommige van die componenten zijn ook voor Lazarus beschikbaar (maar je hebt wel de source code nodig)

In het kort:
Lazarus is gratis en werkt uitstekend.
Delphi werkt ook uitstekend maar is duur en ondersteund andere platvormen alleen met aparte componenten (FireMonkey) of helemaal niet (ie. Linux).

Ik heb erg lang met Delphi gewerkt (Universiteit en mijn vorige werkgever), en ik vindt het een prima systeem.
Lazarus ben ik gaan gebruiken omdat ik ook graag applicaties voor Linux beschikbaar wil maken waar ik kan.

Hoi Hans,

Een vraagje kan je instellen welke tekenset het programma gebruikt.

Namelijk het indienen wordt afgekeurd op een teken wat ik niet kan vinden, maar wat buiten de ANSI set zou liggen.

Graag je hulp

Dank

Je moet dan UniCode of UTF8 o.i.d. gaan gebruiken. Vindt ik zelf altijd wel een lastig onderwerp haha .

Als het goed is zou Lazarus al UniCode compliant, voor het grootste deel althans.
Bij een component, onder de property "font"-"Charset", kun je ook nog eens UniCode selecteren.

Komt dus de vraag ... waar moet dit teken gebruikt worden?
Op het scherm (window, componenten, etc), of in data output (bestand b.v.)?

Tja Hans, Gaat om de output naar een txt files.

Mag alleen ANSI bevatten. Ik gebruik al UTF8Process, maar zal UniCode zoeken.

Lijkt het niet te doen, maar kan niet vinden wat er mis gaat.

Dank

Hmm, dus geen ASCII (te beperkt), UTF8 of UniCode ... alleen maar het antieke ANSI ... 

Ik zag op deze pagina wel de functie UTF8ToAnsi staan en op deze pagina (in de code) de functie WriteAnsiString (daar staat ook een demo hoe je het naar een file schrijft).

Ik heb zelf nooit een ANSI file hoeven te maken, maar omdat alles in jouw programma prima werkt, zou ik de conversie pas bij het wegschrijven naar disk doen.

Hoi

Ik heb nog een vraag. Weet iemand een methode om ervoor te dat als je de exe versie van een programma hebt gestart dat het nog een keer kan opstarten.
Voorlopig is de vraag alleen relevant voor de windows toepassing.
Hulp en/of richting wordt op prijs gesteld.

Gerard

Bedoel je dat programma.exe draait en dat het dan nog eens gestart wordt (automatisch) of dat programma.exe twee keer tegelijk kan draaien?

Ben je toevallig bezig met een web-update mechanisme?